X-Git-Url: http://git.lukelau.me/?p=timetravel.git;a=blobdiff_plain;f=fibonacci.prog;fp=fibonacci.prog;h=501caf8941dd31f053848f3c8733267fec8c391b;hp=0000000000000000000000000000000000000000;hb=e9fa657f1ea66a759f4eae7e58d46a1870c8783a;hpb=6b47555e9d897b72ec9683dfa1c321ce2e709851

diff --git a/fibonacci.prog b/fibonacci.prog
new file mode 100644
index 0000000..501caf8
--- /dev/null
+++ b/fibonacci.prog
@@ -0,0 +1 @@
+Seq (Assign "n" 5) (Seq (Assign "x" 1) (Seq (Assign "y" 0) (While n > 0 (Seq (Assign "tmp" x) (Seq (Assign "x" x + y) (Seq (Assign "y" x) (Assign "n" n - 1)))))))
\ No newline at end of file