That's really cool, Pascal. On Wed, Feb 24, 2016 at 12:22 PM, Skip Cave <[email protected]> wrote:
> Pascal said: > > foldl =: 1 : 'm/`((|.m)/)' > *`+ foldl\. >: i.7 > 209 209 207 69 65 13 7 > > <<<>>> > > %`- foldl\. >: i.7 > 0.6 1.66667 0.333333 9 _5 _1 7 > > Nice! I think the foldl definition can be classified "simple" as well! > > Skip > > > On Wed, Feb 24, 2016 at 11:02 AM, Pascal Jasmin <[email protected]> > wrote: > > with just 2 gerund items, > > > > > > foldl =: 1 : 'm/`((|.m)/)' > > > > > > *`+ foldl\. >: i.7 > > 209 209 207 69 65 13 7 > > > > > > ----- Original Message ----- > > From: Alex Shroyer <[email protected]> > > To: [email protected] > > Sent: Wednesday, February 24, 2016 9:57 AM > > Subject: Re: [Jprogramming] Am I understanding m/y ? > > > > For Skip's example, a completely literal version: > > > > ((*`+)/)`((+`*)/)\. >:i.7 > > > > On Wed, Feb 24, 2016 at 9:25 AM, Brian Schott <[email protected]> > > wrote: > > > >> Pascal, > >> > >> I think your <: is too limiting. But I love your approach. > >> > >> fn =: <@|.@[ (|.each@:|.@:($~ each 1 >. <:) 4 : 'x/ y' every > <\.@]) ] > >> fn =: <@|.@[ (|.each@:|.@:($~ each 1 >. i.@#) 4 : 'x/ y' every > <\.@]) ] > >> > >> On Tue, Feb 23, 2016 at 10:51 PM, Pascal Jasmin <[email protected] > > > >> wrote: > >> > >> > fn =: <@|.@[ (|.each@:|.@:($~ each 1 >. <:) 4 : 'x/ y' every > <\.@]) ] > >> > > >> > > >> > %`- fn 1 2 3 4 5 6 7 > >> > 0.6 1.66667 0.333333 9 _5 _1 7 > >> > > >> > > >> > *`+ fn 1 2 3 4 5 6 7 > >> > 209 209 207 69 65 13 7 > >> > > >> > > >> > > >> > > >> ---------------------------------------------------------------------- > >> 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
