9 lines
149 B
Haskell
9 lines
149 B
Haskell
{-# LANGUAGE TemplateHaskell #-} -- for HscInterpreted
|
|
|
|
module Fib () where
|
|
|
|
fib :: Int -> Int
|
|
fib 0 = 0
|
|
fib 1 = 1
|
|
fib n = fib (n - 1) + fib (n - 2)
|