RobertFischer/fib.hs

Last active March 6, 2018 14:07

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/RobertFischer/f682707b71c87d02df086c214b126a7e.js"></script>
Save RobertFischer/f682707b71c87d02df086c214b126a7e to your computer and use it in GitHub Desktop.

Download ZIP

Haskell fib

Raw

fib.hs

	fib :: Int -> Int
	fib 0 = 0
	fib 1 = 1
	fib 2 = 2
	fib i \| i < 0 = error "argument to fib must be > 0"
	fib i = fib (i-1) + fib (i-2)

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment