Here's one without built in iterator:
rSortZI =: 4 : 0
z =. x #.^:_1 y
e=. ,. b =. i.x
{."1 ([: }:"1 [: ; (b, {:"1) <@}./. e,])^:(#{.z) y,.z
)But it's a bit slower and fatter than rSort :-) -- Met vriendelijke groet, =@@i ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
