home *** CD-ROM | disk | FTP | other *** search
/ The C Users' Group Library 1994 August / wc-cdrom-cusersgrouplibrary-1994-08.iso / vol_100 / 110_01 / fib.c < prev    next >
Text File  |  1984-03-03  |  384b  |  21 lines

  1. /*
  2.  * Fibbonacchi series (?) benchmark run at Usenix Conference.
  3.  * For 16 bit integers, max argument without overflow is 25.
  4.  */
  5.  
  6. main(argc,argv)
  7. char **argv;
  8. {
  9.     printf("%u\n", fib(atoi(argv[1])));
  10. }
  11. fib(p)
  12. int p;
  13. {
  14.     if(p==0)
  15.         return 0;
  16.     else if(p==1)
  17.         return 1;
  18.     else
  19.         return fib(p-1)+fib(p-2);
  20. }
  21.