[gesamt] Added ag/codea/codeb testcases

[testub10.git] / gesamt / codeb_skinner33_05.0

diff --git a/gesamt/codeb_skinner33_05.0 b/gesamt/codeb_skinner33_05.0
new file mode 100644 (file)
index 0000000..f97f4fb
--- /dev/null
+++ b/gesamt/codeb_skinner33_05.0
@@ -0,0 +1,11 @@
+method fib()
+  var n:=0;
+  var a:=0;
+  var b:=1;
+  while n<this do
+    n:=n--1;
+       b:=b-(0-a);
+    a:=b-a;
+  end;
+  return a;
+end;