Greedy algorithm for Egyptian fractions: Difference between revisions
Greedy algorithm for Egyptian fractions (view source)
Revision as of 09:26, 12 April 2014
, 10 years ago→{{header|Perl 6}}: surperfluous but operator
m (→{{header|Perl 6}}: more superstitious parens) |
(→{{header|Perl 6}}: surperfluous but operator) |
||
Line 44:
say .nude.join('/'), " = ", $_ but Egyptian for 43/48, 5/121, 2014/59;
my @sample = map { $_ =>
grep * < 1,
map {$_ but Egyptian},
|