tests/rec_fib.hgn


1
2
3
4
5
6
7
8
9
10
11

main := proc() {
    n := read_int(0)
    f := fib(n)
    print(f)
    exit(0)
}

fib := proc(n) {
    if n < 2 { return n }
    return fib(n - 2) + fib(n - 1)
}