WOW Henry!
>________________________________ > Fra: Henry Rich <[email protected]> >Til: [email protected] >Sendt: 14:02 fredag den 20. september 2013 >Emne: Re: [Jprogramming] 13 : '(g^:x)y' > > >g@[&0 > >Henry Rich > >On 9/20/2013 6:49 AM, Bo Jacoby wrote: >> Thanks to Ric, Don, Kip, and Boss! I myself didn't manage to do it in >> finite time. Bo. >> >> >>>> ________________________________ >>>> Fra: Ric Sherlock <[email protected]> >>>> Til: Programming JForum <[email protected]> >>>> Sendt: 2:41 fredag den 20. september 2013 >>>> Emne: Re: [Jprogramming] 13 : '(g^:x)y' >>>> >>>> >>>> or: >>>> f3=: g@]^:[ >>>> >>>> >>>> >>>> On Fri, Sep 20, 2013 at 10:56 AM, Don Guinn <[email protected]> wrote: >>>> >>>>> Don't know why it didn't, but it took me forever to write it tacit myself. >>>>> >>>>> f2=.([:g])^:[ >>>>> >>>>> f2 >>>>> >>>>> +--------+--+-+ >>>>> >>>>> |+--+-+-+|^:|[| >>>>> >>>>> ||[:|g|]|| | | >>>>> >>>>> |+--+-+-+| | | >>>>> >>>>> +--------+--+-+ >>>>> >>>>> 45 f 27 >>>>> >>>>> 4616 >>>>> >>>>> >>>>> On Thu, Sep 19, 2013 at 3:16 PM, Bo Jacoby <[email protected]> wrote: >>>>> >>>>>> g=.-:&(+ (2&|*>:&+:)) NB. (g y)= 2%~1+3*y if y is odd, (g y)=2%~y >>>>>>if y >>>>>> is even. >>>>>> f=.13 : '(g^:x)y' >>>>>> f >>>>> >> > >>>>>> 4 : '(g^:x)y' >>>>>> >>>>>> >>>>>> I wonder why f is not translated into tacit code. >>>>>> >>>>>> It works nevertheless: >>>>>> 45 f 27 >>>>>> 4616 >>>>>> ---------------------------------------------------------------------- >>>>>> For information about J forums see http://www.jsoftware.com/forums.htm >>>>>> >>>>> ---------------------------------------------------------------------- >>>>> For information about J forums see http://www.jsoftware.com/forums.htm >>>>> >>>> ---------------------------------------------------------------------- >>>> For information about J forums see http://www.jsoftware.com/forums.htm >>>> >>>> >>>> >>> >>> >> ---------------------------------------------------------------------- >> For information about J forums see http://www.jsoftware.com/forums.htm >> >---------------------------------------------------------------------- >For information about J forums see http://www.jsoftware.com/forums.htm > > > ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
