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