2 lines
57 B
Text
2 lines
57 B
Text
: fib ( n-N )
|
|
[ 0 1 ] dip [ over + swap ] times drop ;
|
: fib ( n-N )
|
|
[ 0 1 ] dip [ over + swap ] times drop ;
|