if=: 2 :0
u"_`(v"_)
)
else=: 2 :0
v"_`(0{m)@.((1{m)`:6)
)
('O' if (=0:) else ('<' if (<0:) else '>'))"0 i:5
<<<<<O>>>>>
Do you also want to see an implementation for your alternate proposal?
Thanks,
--
Raul
On Tue, Feb 4, 2014 at 3:48 AM, Michal Wallace <[email protected]> wrote:
> ('O' if (=0:) else ('<' if (<0:) else '>'))"0 i:5
> <<<<<O>>>>>
>
> There are nicer ways to make this output,
> but how would you code 'if' and 'else' above?
>
> Or... 'if'/'then'/'else' below, if you prefer?
>
> a =: assert
> a 4 1 0 2 4 -: if (<0:) then (*: else +:) i:2
> a 4 1 0 2 4 -: (if (<0:) then (*: else +:)) i:2
> a (if ] then (| else -.)) 1 1 0 0 1 0 1 0
> a if ] then (| else -.) 1 1 0 0 1 0 1 0
>
> My versions are here:
>
> https://github.com/tangentstorm/tangentlabs/blob/master/j/syntax.ijs
>
> Thoughts? :)
>
> -Michal
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
