ppc: 'neue' testfaelle angepasst
[testub10.git] / gesamt_ppc / codeb_georg_fib_043.0
index 4db524a74f983f7d379e764c4d8a0b4f94d69ab2..d37fd0e3a1ccb42ac4d0726184cba84368e11749 100644 (file)
@@ -10,13 +10,13 @@ method fib(x)
        var t := this;
        if x < 0 then return -1; end;   t.f0 := 0;
        if x < 1 then return f0; end;   t.f1 := 1;
-       if x < 2 then return f1; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
-       if x < 3 then return f2; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
-       if x < 4 then return f3; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
-       if x < 5 then return f4; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
-       if x < 6 then return f5; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
-       if x < 7 then return f6; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
-       if x < 8 then return f7; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
-       if x < 9 then return f8; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
+       if x < 2 then return f1; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
+       if x < 3 then return f2; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
+       if x < 4 then return f3; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
+       if x < 5 then return f4; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
+       if x < 6 then return f5; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
+       if x < 7 then return f6; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
+       if x < 8 then return f7; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
+       if x < 9 then return f8; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
        return f9;
 end;