13 lines
131 B
Plaintext
13 lines
131 B
Plaintext
|
function int int int => int fibonacci
|
||
|
|
{
|
||
|
|
dup if
|
||
|
|
{
|
||
|
|
req deq deq
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
1 dup + - swp fibonacci
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
20 1 0 fibonacci print
|