No need for the maxBound test in enumFromTo.hs in ch9

Closes #3

Author: dwayne

ch9/enumFromTo.hs

@@ -17,12 +17,12 @@ eftOrd GT GT = [GT]
 
 eftInt :: Int -> Int -> [Int]
 eftInt a b
-  | a > b                   = []
-  | a == b || a == maxBound = [a]
-  | otherwise               = a : eftInt (succ a) b
+  | a > b     = []
+  | a == b    = [a]
+  | otherwise = a : eftInt (succ a) b
 
 eftChar :: Char -> Char -> [Char]
 eftChar a b
-  | a > b                   = []
-  | a == b || a == maxBound = [a]
-  | otherwise               = a : eftChar (succ a) b
+  | a > b     = []
+  | a == b    = [a]
+  | otherwise = a : eftChar (succ a) b