Y combinator: Difference between revisions

Content added Content deleted
m (J: essay)
Line 3,647: Line 3,647:


=={{header|Joy}}==
=={{header|Joy}}==
<lang joy>DEFINE y == [dup cons] swap concat dup cons i;
<syntaxhighlight lang=Joy>DEFINE y == [dup cons] swap concat dup cons i;


fac == [ [pop null] [pop succ] [[dup pred] dip i *] ifte ] y.</lang>
fac == [ [pop null] [pop succ] [[dup pred] dip i *] ifte ] y.</syntaxhighlight>


=={{header|Julia}}==
=={{header|Julia}}==