And you can pinch it a littile bit more with some tricks:

  drag0  =:  {~ (I. {~ _1 + +/\)@:     (+./"1@:~:&' ') NB. original
...
  H=: 1e6 mockData >;:'ABC DEF GHI JKL MNO PQR STUV WXY Z'
  ft3=:([EMAIL PROTECTED]:"1 [: {. 0 {. ])
  6!:2 '((([: +/\ 0 0:} ]) { #~) ft3 f.) H'
0.0384082
  6!:2 'drag0 H'
0.0919567

It is also funny how (0 0:} ]) is not the same as (0: 0} ])


nsg

_________________________________________________________________
All-in-one security and maintenance for your PC.  Get a free 90-day trial! http://clk.atdmt.com/MSN/go/msnnkwlo0050000002msn/direct/01/?href=http://clk.atdmt.com/MSN/go/msnnkwlo0050000001msn/direct/01/?href=http://www.windowsonecare.com/?sc_cid=msn_hotmail

----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to