On Sat, Oct 29, 2011 at 1:04 PM, David Ward Lambert
<[email protected]> wrote:
>   NB. definitions
>   enclose=: >@:{.@:[ , ] , >@:{:@:[
>   f=:1 : 0
> '()'enclose' 'enclose(":m),' ',":y
> :
> '()'enclose' 'enclose(x;&":y)enclose' 'enclose":m
> )
>   '`A B C D'=:('A'f)`('B'f)`('C'f)`('D'f)  NB. I'll bet there's a
>  NB. shorthand.

You could do something like this:

   deff=:3 :('(y)=:y f';'i.0 0')&>
   deff 'ABCD'

But the overhead's not really worth it for this case.

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

Reply via email to