X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=testub10.git;a=blobdiff_plain;f=gesamt%2Fskinner33_01.0;fp=gesamt%2Fskinner33_01.0;h=69c51c6d5be65a879476d78c3bb40c55f82a9471;hp=0000000000000000000000000000000000000000;hb=034dd7c4389fc64072fafdc629cf8bdc4d3c0ce2;hpb=7554a0033edd72a75d0e5d82859fe48dc6a89187 diff --git a/gesamt/skinner33_01.0 b/gesamt/skinner33_01.0 new file mode 100644 index 0000000..69c51c6 --- /dev/null +++ b/gesamt/skinner33_01.0 @@ -0,0 +1,16 @@ + +method even(x) + if x = 0 then + return 0; + else + return odd(x-1); + end; +end; + +method odd(x) + if 0 = x then + return 1; + else + return even((x-1)); + end; +end;