3 lines
60 B
Text
3 lines
60 B
Text
|
fib = fib' 1 1
|
||
|
|
where fib' x y = & x :: fib' y (x + y)
|