restored coercions between eq and eq

diff --git a/matita/library/logic/equality.ma b/matita/library/logic/equality.ma
index 1f68503df37cdb4cb6d31003da083a42fb51052b..510f0c5c6fe3144b395840770c1f8dbe15084163 100644 (file)
--- a/matita/library/logic/equality.ma
+++ b/matita/library/logic/equality.ma
@@ -70,19 +70,24 @@ theorem eq_f': \forall  A,B:Type.\forall f:A\to B.
 intros.elim H.apply refl_eq.
 qed.
 
-(* 
+(*  *)
 coercion cic:/matita/logic/equality/sym_eq.con.
 coercion cic:/matita/logic/equality/eq_f.con.
-*)
+(* *)
 
 default "equality"
  cic:/matita/logic/equality/eq.ind
- cic:/matita/logic/equality/symmetric_eq.con
+ cic:/matita/logic/equality/sym_eq.con
  cic:/matita/logic/equality/transitive_eq.con
  cic:/matita/logic/equality/eq_ind.con
  cic:/matita/logic/equality/eq_elim_r.con
  cic:/matita/logic/equality/eq_f.con
+(* *)
+ cic:/matita/logic/equality/eq_OF_eq.con.
+(* *)
+(*  
  cic:/matita/logic/equality/eq_f'.con. (* \x.sym (eq_f x) *)
+ *)
  
 theorem eq_f2: \forall  A,B,C:Type.\forall f:A\to B \to C.
 \forall x1,x2:A. \forall y1,y2:B.