Commits

Anonymous committed d8faabe Merge

Merge.

Comments (0)

Files changed (1)

 -- ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 -- POSSIBILITY OF SUCH DAMAGE.
 
+module Hev where
 
 -----------------------------------------------------------------------
 -- ========================== Data types =========================== --
 -----------------------------------------------------------------------
 
-import Char
+import Data.Char
 
 --
 -- A data type giving the structure of the trees that Hev programs
 -- Ord type class here, but for now at least, I won't.
 --
 
-data Num a => PossiblyInfinite a = Finite a
-                                 | Infinity
+data PossiblyInfinite a = Finite a
+                        | Infinity
      deriving (Show, Read, Eq)
 
 isGreater i (Finite j) = i > j