You have probably long since realized this, but, in: s11 =. [ s12 =. padB@:[ (+/ .*) [ s21 =. |:@:s12 s22 =. ] + ((padB@:[ (+/ .*) [) (+/ .*) |:@:padB@:[) absorbNode =: ((s11 , s12) ,. (s21 , s22)) f.
you could have instead used s22 =. ] + s12 (+/ .*) |:@:padB@:[ (and those parenthesis are unnecessary.) FYI, -- Raul ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
