cutr =: ' '&$: : (4 : '(0;(2 2 2$1 1 0 0 1 0 0 3);(a. e. x))&;: y') :.joinstring

seems to work identically to built-in cut.  The speed metrics are on a 100Kb~ 
string on amd j806.
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to