RosettaCodeData/Task/Evaluate-binomial-coefficients/Raku/evaluate-binomial-coefficie...

2 lines
71 B
Raku

sub infix:<choose> { ([*] ($^n ... 0) Z/ 1 .. min($n - $^p, $p)).Int }