RosettaCodeData/Task/Evaluate-binomial-coefficients/Raku/evaluate-binomial-coefficients-3.raku
2023-07-01 13:44:08 -04:00

1 line
65 B
Raku

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