mirror of
https://github.com/MartinThoma/LaTeX-examples.git
synced 2025-04-26 06:48:04 +02:00
5 lines
137 B
Haskell
5 lines
137 B
Haskell
binom :: (Eq a, Num a, Num a1) => a -> a -> a1
|
|
binom n k =
|
|
if (k==0) || (k==n)
|
|
then 1
|
|
else binom (n-1) (k-1) + binom (n-1) k
|