X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=aus_sammelwut%2Fpaulchen%2Fublu%2Fss08%2Fabgabe%2Fgesamt%2Ftestcases%2F.svn%2Ftext-base%2Ffib2.0.svn-base;fp=aus_sammelwut%2Fpaulchen%2Fublu%2Fss08%2Fabgabe%2Fgesamt%2Ftestcases%2F.svn%2Ftext-base%2Ffib2.0.svn-base;h=efc08c709bc80e4937bffc3387255449f45e6007;hb=f6171150f9e60240b256808fc31613530b21db6c;hp=0000000000000000000000000000000000000000;hpb=b82da83a0ad2014c11113818eee6bd5fb5f3445c;p=uebersetzerbau-ss10.git diff --git a/aus_sammelwut/paulchen/ublu/ss08/abgabe/gesamt/testcases/.svn/text-base/fib2.0.svn-base b/aus_sammelwut/paulchen/ublu/ss08/abgabe/gesamt/testcases/.svn/text-base/fib2.0.svn-base new file mode 100644 index 0000000..efc08c7 --- /dev/null +++ b/aus_sammelwut/paulchen/ublu/ss08/abgabe/gesamt/testcases/.svn/text-base/fib2.0.svn-base @@ -0,0 +1,16 @@ + (* fibonacci *) + func fib(x) + if not x >= 2 then + return x; + else + return fib(x+(-1))+fib(x+(-2)); + end; + end; +(* func main() + if not (fib(9)+(-fib(7))) = fib(8) then + return 1; + else + return 0; + end; + end; +*)