Or:
f=:'|' ,"1 '|' ,"1~ (([: # [) , 4 + 2 * 2 { [: $ [: > ,.) $ [: , (,'|')
,"1~ '|' ,"1 [: > ,.
a f b
||abc ||xyzxyz ||
||def ||xyz ||
||g ||xyz ||
||hijkl ||xyzxyz ||
||mn ||xyzxyzxyz||Linda ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
