thanks very much Raul, a slight modification to make the keys turn out consistently...
mv=: 2 : 0 if.0=#r=.find__n<y do.y set__n r=.u y end.r : key=. (x;y) if.0=#r=.find__n <key do.key set__n r=.x u y end.r ) I assume that : can also be used in adverb definitions to affect dyads --- "Miller, Raul D" <[EMAIL PROTECTED]> wrote: > mv=: 2 : 0 > if.0=#r=.find__n<y do.y set__n r=.u y end.r > : > key=. <x,&<y > if.0=#r=.find__n key do.key set__n r=.x u y end.r > ) > > -- > Raul > ---------------------------------------------------------------------- > For information about J forums see > http://www.jsoftware.com/forums.htm > __________________________________________________ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
