Numerical and alphabetical suffixes: Difference between revisions
Content deleted Content added
Thundergnat (talk | contribs) →{{header|Perl 6}}: extend the precision some more |
Thundergnat (talk | contribs) m →{{header|Perl 6}}: simplify slightly |
||
Line 596:
$ret = [*] $ret, |@suf.map: { %suffix{$_} } if @suf[0];
$ret = [*] ($ret, * - $fact.chars …^ * < 2) if $fact.chars;
$ret.?precise
}
| |||