On Tue, Apr 6, 2010 at 8:42 AM, Raul Miller <[email protected]> wrote: > boxo=: 4 : ',/((x ,: x&+)"1 -~/\@,:"1 y&-"1) y*=i.#y'/
For understanding how this works, the following are instructive: $(4 : '((x ,: x&+) -~/\@,:"1 y&-)"1 y*=i.#y'/) 0,:4 3 2 (4 : '((x ,: x&+) ; y&-)"1 y*=i.#y'/) 0,:4 3 2 FYI, -- Raul ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
