5 lines
69 B
Text
5 lines
69 B
Text
(
|
|
(2 <)
|
|
(pred (1 0 (over + swap)) dip times pop)
|
|
unless
|
|
) ^fib
|