fib.hs (164B)
1 module Main where 2 3 fib n = if n > 1 4 then fib (n - 1) + fib (n - 2) 5 else 6 if n == 1 7 then 1 8 else 0 9 10 main = print (fib 10)
haskell-programmingSimple Haskell programs | |
| git clone git://git.laack.co/haskell-programming.git | |
| Log | Files | Refs |