- 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 20c326d7d2ca00a91c7c2f3698523e8116e9eb5e..e12c85adbe5e171962595ca9f4343d4b36686c81 100644 (file)
--- a/helm/software/matita/library/nat/totient1.ma
+++ b/helm/software/matita/library/nat/totient1.ma
@@ -105,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