nabe256 · April 20, 2012 19:39
diff --git a/fib1.hs b/fib1.hs
 fib :: Num a => a -> a
 fib 0 = 0
 fib 1 = 1
 fib n = fib(n-2) + fib(n-1)

 main = mapM_ print $ map fib [0..9]
	fib :: Num a => a -> a
	fib 0 = 0
	fib 1 = 1
	fib n = fib(n-2) + fib(n-1)

	main = mapM_ print $ map fib [0..9]