<:@#(([+{);>:@{`[`]})&>/^:(((0<:[)*.(<#))&>/)^:a:@(0&;)0 _2 0 0
3---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
<:@#(([+{);>:@{`[`]})&>/^:(((0<:[)*.(<#))&>/)^:a:@(0&;)0 _2 0 0
3---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm