P.S. here is a quick patch to change oleg's solution from the domain I thought you were working in to the right one:
boxO=: 4 : '-~/\"2 ,/((x ,:"1 x&+"1) ,:"1 y&-"1) y*=i.#y'/ Example use: boxO 0,:4 3 2 FYI, -- Raul ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
