4 lines
105 B
Text
4 lines
105 B
Text
DEF fib() (
|
|
VAR seq <- [0, 1]; EVERY SUSP seq:values;
|
|
REP SUSP seq:put(seq:pop + seq[1])[-1];
|
|
);
|