--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/fib.while	Fri Nov 23 19:28:10 2012 +0000
@@ -0,0 +1,12 @@
+{ n := 9;
+     minus1 := 0;
+     minus2 := 1;
+     temp := 0;
+     while n > 0 do  {
+       temp := minus2;
+       minus2 := minus1 + minus2;
+       minus1 := temp;
+       n := n - 1
+     };
+     fib_res := minus2
+}