12 lines
293 B
Plaintext
12 lines
293 B
Plaintext
hello|
|
|
define fib<1> as [
|
|
return 1 if argument #1 = 1|
|
|
return 1 if argument #1 = 2|
|
|
return do "fib"<argument #1-1;> + do "fib"<argument #1-2;>|
|
|
]|
|
|
do print<do "fib"<1;>;>|
|
|
do print<do "fib"<2;>;>|
|
|
do print<do "fib"<3;>;>|
|
|
do print<do "fib"<6;>;>|
|
|
do print<do "fib"<10;>;>|
|
|
goodbye| |