1 files changed, 0 insertions, 21 deletions
diff --git a/fib4 b/fib4
deleted file mode 100755
index 71b11f10b3..0000000000
--- a/fib4
+++ /dev/null
@@ -1,21 +0,0 @@
-#!/usr/bin/perl
-
-sub fib
-{
-    local($a) = $_[0];
-    ($a < 2) ? $a : &fib($a-1) + &fib($a-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);
-