- transcript: bugfix

[helm.git] / helm / software / matita / library / nat / totient1.ma

diff --git a/helm/software/matita/library/nat/totient1.ma b/helm/software/matita/library/nat/totient1.ma
index c6b78ec90864ebea03557c675d267e8e2d6a3607..e12c85adbe5e171962595ca9f4343d4b36686c81 100644 (file)
--- a/helm/software/matita/library/nat/totient1.ma
+++ b/helm/software/matita/library/nat/totient1.ma
@@ -12,8 +12,6 @@
 (*                                                                        *)
 (**************************************************************************)
 
-set "baseuri" "cic:/matita/nat/totient1".
-
 include "nat/totient.ma".
 include "nat/iteration2.ma".
 include "nat/gcd_properties1.ma".
@@ -107,7 +105,7 @@ apply (trans_eq ? ?
                   | apply divides_gcd_n
                   ]
                 ]
-              | apply cic:/matita/nat/compare/eq_to_eqb_true.con.
+              | apply eq_to_eqb_true.
                 rewrite > (eq_gcd_div_div_div_gcd x n (gcd x n))
                 [ apply (div_n_n (gcd x n) Hcut)
                 | assumption