[gesamt] Added and adopted Testcases from SS09

[testub10.git] / gesamt / old_abgabe_cf.0

diff --git a/gesamt/old_abgabe_cf.0 b/gesamt/old_abgabe_cf.0
new file mode 100644 (file)
index 0000000..5404a09
--- /dev/null
+++ b/gesamt/old_abgabe_cf.0
@@ -0,0 +1,15 @@
+method a(m n)
+  if m=0 then
+    return n-(-1);
+  else
+       if (0<m) then
+               if (n=0) then
+                   return a(m-1,1);
+               else
+               return a(m-1,a(m,n-1));
+               end;
+       else
+               return a(m-1,a(m,n-1));
+       end;            
+  end;
+end;