RosettaCodeData/Task/Evaluate-binomial-coefficients/OCaml/evaluate-binomial-coefficients-3.ml

3 lines
102 B
OCaml
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
open Num;;
let rec binomial n k = if n = k then Int 1 else ((binomial (n-1) k) */ Int n) // Int (n-k)