Advertisement
Guest User

Untitled

a guest
Nov 27th, 2013
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. let k = 2
  2. let n = 5
  3.  
  4. let rec f (n, k) =
  5.     match (n, k) with
  6.         (1, 1) -> 1
  7.         |(_, 0) -> 1
  8.         |(_, _) -> f(n - 1, k - 1) + f(n - 1, k)
  9. let rez = f (n, k)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement