Lines Matching refs:fib
34 # We do this by running the fib() function with successfily larger
36 # to execute. Then we memoize fib() and run the same call cagain. If
44 sub fib {
48 fib($n-1) + fib($n-2);
64 $RESULT = fib($N);
68 print "# fib($N) took $ELAPSED seconds.\n" if $N % 1 == 0;
69 # we'd expect that fib(n+1) takes about 1.618 times as long as fib(n)
82 print "# OK, fib($N) was slow enough; it took $ELAPSED seconds.\n";
85 &memoize('fib');
89 $RESULT2 = fib($N);
101 $RESULT2 = fib($N);