(#^:_1)!. is better.
b=: 100000#<,'a'
a=:'-'
n=: 199999$1 0
ts'Q=:}:@;@:(,&a &.>) b'
0.0464003 7.85971e6
ts'QQ=:;n(#^:_1)!.(<a) b'
0.0146013 1.31226e6
QQ -: Q
1
David
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
