read MVPoisson:

A2:=[[1,  0,  0,  1,  1], [0,  1,  1,  1,  1]]:
RecsV(A2,g,b):

quit: