Hello Raul;
Is your definition of ts, which seems to ignore the left argument when
used dyadically, useful for some other purpose which I don't happen to see?
Raul Miller wrote:
On 7/1/08, R.E. Boss <[EMAIL PROTECTED]> wrote:
f3=: 3 : 'y * ($y) [EMAIL PROTECTED] 0'
f2=: 3 : 'y * ?(#y)#0'
ts 'f2 Y' [Y=:1000 1000$9
0.0098060407 8402944
ts 'f3 Y'
0.034617353 16781696
ts=: 6!:2, 7!:2&]
f2=: 3 : 'y * ?(#y)#0'
f3=: 3 : 'y * ($y) [EMAIL PROTECTED] 0'
Y=: 1000 1000$9
NB. J64, 3GHz CPU
ts 'f2 Y'
0.00713778 8.40294e6
ts 'f3 Y'
0.0262947 1.67817e7
NB. J32, 1.8GHz CPU
ts 'f2 Y'
0.0746899 1.78279e7
ts 'f3 Y'
0.0724159 1.67795e7
Note also that times can vary by more than 25%
FYI,
--
------------------------------------------------------------------------
|\/| Randy A MacDonald | APL: If you can say it, it's done.. (ram)
|/\| ramacd <at> nbnet.nb.ca |
|\ | | The only real problem with APL is that
BSc(Math) UNBF'83 | it is "still ahead of its time."
Sapere Aude | - Morten Kromberg
Natural Born APL'er |
-----------------------------------------------------(INTP)----{ gnat }-
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
