Very impressive, [EMAIL PROTECTED] appears distorted in the archives by the way.
To: "Programming forum" <[email protected]> leaner, faster involute=.$ /:@(+/\)@(,@(<./ {. |:@(1 0 + [EMAIL PROTECTED]@|.)) # +:@<./ $ (, -)@(1 , {:)) vs spiral=. $ /:@:(*/ {. }:@:(0&({::)@:((([ , {.@:]) ; |.@:|:@:}.@:])&>/^:_))@:(''&;)@:i.) (spiral-:involute) 200 300 1 st=.7!:[EMAIL PROTECTED] , 6!:2 st 'spiral 200 300' 5.24621e6 0.389979 st 'involute 200 300' 1.0496e6 0.00278834 ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
