Here's the obvious tacit approach:
   tailshape1=: [ $"1 _1 ] ]\~ [: - [: */ [

Here's an explicit approach:
   tailshape2=:4 :'(-*/x) (x&$)\ y'

I think the explicit approach should be more efficient for
bulky V.

-- 
Raul

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

Reply via email to