I wrote:
> ins=:1 :0
> :
>  b=.1#~1 j.m e.~i.#y
>  x (I.-.b)} b expand y
> )

Or, equivalently:

ins1=:1 :0
:
 b=.1#~1 j.m e.~i.#y
 x (m+1+i.#m)} b expand y
)

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

Reply via email to