RosettaCodeData/Task/Evaluate-binomial-coefficients/Perl-6/evaluate-binomial-coefficients-2.pl6
2016-12-05 22:15:40 +01:00

2 lines
67 B
Raku

sub infix:<choose> { [*] ($^n ... 0) Z/ 1 .. $^p }
say 5 choose 3;