On Tue, Aug 26, 2008 at 4:20 PM, Raul Miller <[EMAIL PROTECTED]> wrote: > lj=: - ((#~ 0&~:) */@:% ] #~ 0 ~: ]) "1 -/[EMAIL PROTECTED]
Or, slightly cleaner:
lj=: - (0&~:@] */@# %)"1 -/[EMAIL PROTECTED]
--
Raul
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
