path: root/fib_ltI.icl

module fib_ltI

import StdEnv

fib :: !Int -> Int
fib n
	| n < 2
		= 1
		= fib (n-2) + fib (n-1)

Start = fib 43