Revision as of 23:07, 31 March 2014 view source Thundergnat (talk \| contribs) 10,352 edits →‎{{header\|Perl 6}}: Added Perl 6 implementation ← Older edit		Revision as of 23:15, 31 March 2014 view source Thundergnat (talk \| contribs) 10,352 edits m →‎{{header\|Perl 6}}: clean up the forest of parenthesis a bit Newer edit →
Line 72: =={{header\|Perl 6}}== <lang perl6>sub farey ($order) { (0/1, (1..$order).map(: {(1..$^d).map(: { $^n/$d }) })).Set.list } sub pp (Rat $r) { sprintf "%d/%d", $r.nude }

Farey sequence: Difference between revisions