mirror of
https://github.com/MartinThoma/LaTeX-examples.git
synced 2025-04-25 22:38:04 +02:00
2 lines
75 B
Haskell
2 lines
75 B
Haskell
fak :: (Eq a, Num a) => a -> a
|
|
fak n = if (n==0) then 1 else n * fak (n-1)
|