7 lines
137 B
Text
7 lines
137 B
Text
|
|
let node fib () = n where
|
|
rec n = 0 -> pre (1 -> (pre n) + n)
|
|
|
|
let node main () =
|
|
let f = fib () in
|
|
print_int f; print_newline ()
|