Anonymous user
Ethiopian multiplication: Difference between revisions
m
→{{header|Perl 6}}: move lambdas inside the function
(→{{header|Perl 6}}: add a more idiomatic version) |
m (→{{header|Perl 6}}: move lambdas inside the function) |
||
Line 1,900:
}</lang>
More succinctly using implicit typing, primed lambdas, and an infinite loop:
<lang perl6>
my &
my &even = * %% 2;
my ($a,$b) = @_;
my $r;
| |||