From: Andrea Asperti <andrea.asperti@unibo.it>
Date: Wed, 26 Apr 2006 13:23:29 +0000 (+0000)
Subject: removed ocaml equality on equations
X-Git-Tag: make_still_working~7394
X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=b595a6436891bc4bf6cb0cc00f2589a4fbe60eca;p=helm.git

removed ocaml equality on equations
---

diff --git a/helm/software/components/tactics/paramodulation/saturation.ml b/helm/software/components/tactics/paramodulation/saturation.ml
index fac0197df..d5da5485f 100644
--- a/helm/software/components/tactics/paramodulation/saturation.ml
+++ b/helm/software/components/tactics/paramodulation/saturation.ml
@@ -112,7 +112,7 @@ module OrderedEquality = struct
         | 0 -> 
             let res = (List.length m1) - (List.length m2) in 
             if res <> 0 then res else 
-              Pervasives.compare eq1 eq2
+              Equality.compare eq1 eq2
         | res -> res 
 end