X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=testub10.git;a=blobdiff_plain;f=gesamt%2Fskinner33_00.0;fp=gesamt%2Fskinner33_00.0;h=adf9ee94087c80ddc8f3238604f46f2b3f8837e9;hp=0000000000000000000000000000000000000000;hb=034dd7c4389fc64072fafdc629cf8bdc4d3c0ce2;hpb=7554a0033edd72a75d0e5d82859fe48dc6a89187

diff --git a/gesamt/skinner33_00.0 b/gesamt/skinner33_00.0
new file mode 100644
index 0000000..adf9ee9
--- /dev/null
+++ b/gesamt/skinner33_00.0
@@ -0,0 +1,19 @@
+struct a end;
+
+method even()
+	if this.a = 0 then
+		return 0;
+	else
+		this.a := this.a - 1;
+		return odd();
+	end;
+end;
+
+method odd()
+	if 0 = this.a then
+		return 1;
+	else
+		this.a := this.a - 1;
+		return even();
+	end;
+end;