Roger Hui wrote: > m10a=: [: +/ <[EMAIL PROTECTED]&5^:(>:@i.@>.@(5&^.)`]) > Another approach.
f=:[: +/ 5 = [: , [: q: [: >: i. f 5000 1249 John ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
