[discard unused and strange Ord instances
Helmut Grohne <grohne@cs.uni-bonn.de>**20140724125522
 Ignore-this: c3514f1ea38b3436fc3af1ae3564e799
] hunk ./src/Igor2/Data/CallDependencies.hs 28
-import qualified Data.Graph.Inductive as G (empty, nodes)
+import qualified Data.Graph.Inductive as G
hunk ./src/Igor2/Data/CallDependencies.hs 74
-newtype Calls = Calls{ unC :: (Gr Name Ordering)}
-   
---deriving instance Eq Calls
---deriving instance Ord Calls
-     
-instance Eq Calls where
-    (==) = equal `on` unC
-instance Ord Calls where
-    compare _ _ = EQ
+newtype Calls = Calls{ unC :: G.Gr Name Ordering} deriving (Eq)
+
hunk ./src/Igor2/Data/CallDependencies.hs 88
-    (==) c1 c2 = ( on (==) callings c1 c2) &&
-                 ( on (==) (B.toAscList.nodes) c1 c2) 
-instance Ord CallDep where
-    compare c1 c2 = ( on compare callings c1 c2) `compare`
-                    ( on compare (B.toAscList.nodes) c1 c2)      
+    (==) c1 c2 = on (==) callings c1 c2 &&
+                 on (==) (B.toAscList . nodes) c1 c2
hunk ./src/Igor2/Data/Hypotheses.hs 56
-               deriving(Eq, Ord, Show)
-               
+               deriving (Eq, Show)
+