1 files changed, 0 insertions, 25 deletions
diff --git a/test/cminor/integr.cm b/test/cminor/integr.cm
deleted file mode 100644
index 28f0a1de..00000000
--- a/test/cminor/integr.cm
+++ /dev/null
@@ -1,25 +0,0 @@
-"square" (x): float -> float
-{
-  return x *f x;
-}
-
-"integr"(f, low, high, n): int -> float -> float -> int -> float
-{
-  var h, x, s, i;
-  h = (high -f low) /f floatofint n;
-  x = low;
-  s = 0.0;
-  i = n;
-  {{ loop {
-      if (! (i > 0)) exit;
-      s = s +f (f(x): float -> float);
-      x = x +f h;
-      i = i - 1;
-  } }}
-  return s *f h;
-}
-
-"test"(n) : int -> float
-{
-  return "integr"("square", 0.0, 1.0, n): int -> float -> float -> int -> float;
-}