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 <michal.wall...@gmail.com> 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