RosettaCodeData/Task/Fibonacci-sequence/YAMLScript/fibonacci-sequence.ys

8 lines
104 B
Plaintext

!YS-v0
defn main(n=10):
loop a 0, b 1, i 1:
say: a
when i < n:
recur: b, (a + b), i.++