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

3 lines
102 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
open Num;;
let rec binomial n k = if n = k then Int 1 else ((binomial (n-1) k) */ Int n) // Int (n-k)