Files
plthy/tests/09_fib.plthy
2024-02-21 15:37:38 +01:00

12 lines
299 B
Plaintext

hello|
define fib<1> as [
do return 1 if argument #1 = 1|
do 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|