It's super fast, but doesn't seem to produce the correct result!
Where's the typo?
(C,c) qq
152 7030779
ts'c qq'
0.0159982 21632
ts'C qq'
0.0107839 289920
Sorry,
Mike
On 24/06/2017 14:04, Raul Miller wrote:
Or,
C=: <./@(>:@i.@# <./@([ * <./\)"0 1 ])
Thanks,
---
This email has been checked for viruses by Avast antivirus software.
https://www.avast.com/antivirus
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm