ic =: [: , ([: i: 9&o.) j./ [: i: 11&o.
   ic2 =: [: , j./&i:/@+.

   NB. equivalence of monadic compose and atop
   (ic-:ic2)&> 1j2 0j2    NB. monadic compose
1 1
   (ic-:ic2)@> 1j2 0j2    NB. monadic atop
1 1
   
   NB. The rest of this message appears to be
   NB. a summary of posts I've just read.

   (ic-:ic2)"0 (1j2 0j2)   NB. rank 0 equivalence
1 1
   
   ([: (ic-:ic2) >)"0 (1j2 0j2)
1 1

   NB. outer tines of fork cap and open
   NB. assemble all results before the
   NB. the middle tine evaluates
   NB. explaining the tally 1 result
   ([: (ic-:ic2) >) (1j2 0j2)
0
   
   NB. Force the middle tine
   NB. to evaluate at rank 0
   ([: (ic-:ic2)"0 >) (1j2 0j2)
1 1
   
>Date: Tue, 22 Jan 2013 01:28:20 -0500
>From: "Linda Alvord" <[email protected]>
>To: <[email protected]>
>Subject: Re: [Jprogramming] [Jprogrammingou Hermitian from triangular
>Message-ID: <000001cdf869$aca4fa00$05eeee00$@net>
>
>What is the problem here?
>
>   (ic-:ic2)&> 1j2 0j2
>1 1
>   ([:(ic-:ic2)>) 1j2 0j2
>0
>
>u@v y ? u v y  Moreover, the monadic uses of u@v and u&v are
equivalent.


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

Reply via email to