path: root/comparison/SML/fib38.sml

fun fib 0 = 0
| fib 1 = 1
| fib n = (fib (n-1)) + (fib (n-2));

fib 38;