Here's three ways
c1=: 2 : '([: u (+/n)&{.),({:n)&}.'
cc=: 2 : 'c1 (m,n)'
cc=: 2 : '1 : (''([: u '',(":m+n),''&{.) , '',(":n),''&}.'')'
lr=: 1 : '5!:5<''u'''
cc=: 2 : '1 :(''u''[`(i.&''z''@])`]}(([: z (m+n)&{.) , m&}.)lr)'
--- June Kim <[EMAIL PROTECTED]> wrote:
> I know the next one is wrong but... to illustrate what I want to achieve:
> cc=. conjunction def '([: u (m+n)&{.) , m&}.'
>
> What I really want is:
>
> 2 cc 3
> 1 : '([: u 5&{.),3&}.'
> */ 2 cc 3
> ([: */ 5&{.) , 3&}.
>
> Clean ways to do this?
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
