Update my answers in ch6

Author: dwayne

ch6/ex3.hs renamed to ch6/ex1.hs

@@ -1,3 +1,6 @@
+-- Exercises: Eq Instances
+
+
 -- 1
 
 data TisAnInteger = TisAn Integer

ch6/ex1.txt

@@ -1,23 +1,8 @@
-1.
+Exercises: Tuple Experiment
 
-  max (length [1, 2, 3]) (length [8, 9, 10, 11, 12])
-= max 3 5
-= 5
 
-2.
+quotRem :: Integral a => a -> a -> (a, a)
+quotRem x y = (x quot y, x rem y)
 
-  compare (3 * 4) (3 * 5)
-= compare 12 15
-= LT
-
-3.
-
-compare "Julie" True
-
-This will result in an error since True is not of type [Char].
-
-4.
-
-  (5 + 3) > (3 + 6)
-= 8 > 9
-= False
+divMod :: Integral a => a -> a -> (a, a)
+divMod x y = (x div y, x mod y)

ch6/ex2.txt

@@ -0,0 +1,25 @@
+Exercises: Will They Work?
+
+1.
+
+  max (length [1, 2, 3]) (length [8, 9, 10, 11, 12])
+= max 3 5
+= 5
+
+2.
+
+  compare (3 * 4) (3 * 5)
+= compare 12 15
+= LT
+
+3.
+
+compare "Julie" True
+
+This will result in an error since True is not of type [Char].
+
+4.
+
+  (5 + 3) > (3 + 6)
+= 8 > 9
+= False

ch6/ex3.txt

@@ -213,7 +213,7 @@ For e.g. since [Int] will satisfy the type signature we would end up passing a
 list of Ints to mySort which will result in a type error because it can only
 take a list of Chars.
 
-Type-Kwon-Do
+Type-Kwon-Do Two: Electric Typealoo
 
 1.