On Sun, May 4, 2014 at 12:21 PM, Jose Mario Quintana
<[email protected]> wrote:
> >> 'X Y'=. 'X' ; 'Y'
I see it now, thank you.
I should note also that I ran into two other problems hindering my
initial understanding of your post.
One was email induced line wrapping. I did not realized I had
overlooked that until I tried some of your expressions and received a
domain error.
The other was your use of =. instead of =: which I realized when I
continued to experience that domain error when I was splitting
execution of some expressions in a script and others interactively.
I think the moral of the story here is that I rely on my ability to
test code to build my understandings of it.
That said, I also like to find fixes for problems I encounter, even if
I suspect no one else will ever encounter those problems nor have need
of my "fixes". So:
'X Y'=: 'X' ; 'Y'
longdef=:3 :'0 !:0]0 : y -.LF'
longdef 0
u=: (
'('"_ , 'u '"_ , ] , ')'"_
) :(
'('"_ , [ , ' u '"_ , ] , ')'"_
) :.(
(
'('"_ , 'u^:_1 '"_ , ] , ')'"_
) :(
'('"_ , [ , ' u^:_1 '"_ , ] , ')'"_
)) NB.
)
longdef 0
v=: (
'('"_ , 'v '"_ , ] , ')'"_
) :(
'('"_ , [ , ' v '"_ , ] , ')'"_
) :.(
(
'('"_ , 'v^:_1 '"_ , ] , ')'"_
) :(
'('"_ , [ , ' v^:_1 '"_ , ] , ')'"_
)) NB.
)
(i:999) ( X&u -: X&u@]^:[ ) Y
Thanks,
--
Raul
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
