Slower , but more concise

pair3=:[:;<@({.,.}.)[EMAIL PROTECTED]


Arie Groeneveld schreef:
> pair2=:([:;],."0 _&.>[:<\.1&+)@i.@<:
>
>    (pair2-:pairi) 100
> 1
>   
>   
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to