X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=testub10.git;a=blobdiff_plain;f=gesamt%2Fcodeb_skinner33_05.0;fp=gesamt%2Fcodeb_skinner33_05.0;h=f97f4fb3a6b860ba00e1a72896601c6207200067;hp=0000000000000000000000000000000000000000;hb=029401d51612c5e69d7ac8603e1b69cd7ed6ef96;hpb=bf19094ac2573112418701ba4c6abf5779e3a9f7

diff --git a/gesamt/codeb_skinner33_05.0 b/gesamt/codeb_skinner33_05.0
new file mode 100644
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;