2
0
Fork 0
mirror of https://github.com/MartinThoma/LaTeX-examples.git synced 2025-04-25 22:38:04 +02:00

Haskell / Prolog

This commit is contained in:
Martin Thoma 2014-02-24 11:44:57 +01:00
parent 689ab4f5cf
commit 2306a2af2e
10 changed files with 166 additions and 24 deletions

View file

@ -0,0 +1,5 @@
binom :: (Eq a, Num a, Num a1) => a -> a -> a1
binom n k
| (k==0) || (k==n) = 1
| otherwise = binom (n-1) (k-1)
+ binom (n-1) k