[project @ 1999-11-26 10:25:52 by simonpj]
authorsimonpj <unknown>
Fri, 26 Nov 1999 10:27:17 +0000 (10:27 +0000)
committersimonpj <unknown>
Fri, 26 Nov 1999 10:27:17 +0000 (10:27 +0000)
fromInt wibble

imaginary/paraffins/Main.hs
imaginary/x2n1/Main.hs

index 6a92159..cc372be 100644 (file)
@@ -1,12 +1,16 @@
+
+{-# OPTIONS -syslib exts #-}
+
 {-
  - Id Example Program
  - Ensnaffled by SLPJ from MIT via
  - RPaul <rpaul@juicy-juice.lcs.mit.edu> 93/08/26.
  - Original author: Steve Heller
  -}
-
 module Main (main) where
 import Array
+import Int( Num(fromInt) )     -- Shouldn't really use this in a benchmark,
+                               -- but don't want change wrt old baselines
 
 -- Generation of radicals
 
index d04cb9c..a95f827 100644 (file)
@@ -1,3 +1,5 @@
+{-# OPTIONS -syslib exts #-}
+
 {-
 Date: Tue, 15 Dec 92 14:39:56 +0100
 From: Lennart Augustsson <augustss@cs.chalmers.se>
@@ -25,6 +27,8 @@ of all the other programs I thought I'd contribute at least one :-)
 
 module Main ( main ) where
 import Complex
+import Int( Num(fromInt) )     -- Shouldn't really use this in a benchmark,
+                               -- but don't want change wrt old baselines
 
 main = print (round (realPart (sum [f n | n <- [1..10000]])))