summaryrefslogtreecommitdiff
path: root/fib
diff options
context:
space:
mode:
Diffstat (limited to 'fib')
-rwxr-xr-xfib20
1 files changed, 0 insertions, 20 deletions
diff --git a/fib b/fib
deleted file mode 100755
index 022d9d0159..0000000000
--- a/fib
+++ /dev/null
@@ -1,20 +0,0 @@
-#!./perl
-
-sub fib
-{
- ($_[0] < 2) ? $_[0] : &fib($_[0]-1) + &fib($_[0]-2);
-}
-
-sub myruntime
-{
- local(@t) = times; # in seconds
- $t[0] + $t[1];
-}
-
-$x = (shift || 20);
-print "Starting fib($x)\n";
-$before = &myruntime;
-$y = &fib($x);
-$after = &myruntime;
-printf("Done. Result $y in %g cpu seconds.\n", $after-$before);
-