/****************************************************************/ /*** Caluclates Fibonacci numbers ***/ /*** Rechnergestütztes Wissenschaftliches Rechnen ***/ /*** University of Goettingen, Germany 2004 ***/ /****************************************************************/ #include #include /** calculates Fibonacci number of 'n' dynamically **/ double fib_dynamic(int n) { double *fib, result; int t; if(n<=2) /* simple case ? */ return(1); /* return result directly */ fib = (double *) malloc(n*sizeof(double)); fib[1] = 1.0; /* initialise known results */ fib[2] = 1.0; for(t=3; t