13 lines
197 B
Text
13 lines
197 B
Text
(fib=
|
|
last i this new
|
|
. !arg:<2
|
|
| 0:?last:?i
|
|
& 1:?this
|
|
& whl
|
|
' ( !i+1:<!arg:?i
|
|
& !last+!this:?new
|
|
& !this:?last
|
|
& !new:?this
|
|
)
|
|
& !this
|
|
)
|