X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=testub10.git;a=blobdiff_plain;f=gesamt%2Fcodeb_georg_fib_042.call;fp=gesamt%2Fcodeb_georg_fib_042.call;h=29e74712caeaa66628e8fc48be72e9bdf7ddc4be;hp=0000000000000000000000000000000000000000;hb=029401d51612c5e69d7ac8603e1b69cd7ed6ef96;hpb=bf19094ac2573112418701ba4c6abf5779e3a9f7 diff --git a/gesamt/codeb_georg_fib_042.call b/gesamt/codeb_georg_fib_042.call new file mode 100644 index 0000000..29e7471 --- /dev/null +++ b/gesamt/codeb_georg_fib_042.call @@ -0,0 +1,3 @@ +long s[]={1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16}; +extern long fib(long *,long); +RET(fib(s,-1)==-1 && fib(s,0)==0 && fib(s,1)==1 && fib(s,2)==1 && fib(s,3)==2 && fib(s,7)+fib(s,8)==fib(s,9));