...

[helm.git] / helm / software / matita / library / Z / dirichlet_product.ma

diff --git a/helm/software/matita/library/Z/dirichlet_product.ma b/helm/software/matita/library/Z/dirichlet_product.ma
index 6328bc7dca8ca34f3a836d2f7b54af8a4a204ada..c45b4dc53443d1d3eb76e84044217bb1e5dc1dd1 100644 (file)
--- a/helm/software/matita/library/Z/dirichlet_product.ma
+++ b/helm/software/matita/library/Z/dirichlet_product.ma
@@ -257,7 +257,7 @@ apply (trans_eq ? ?
                        assumption
                       ]
                     |elim (divides_b_true_to_divides ? ? H4).
-                     apply (witness ? ? n2).
+                     apply (witness ? ? n1).
                      rewrite > assoc_times.
                      rewrite < H5.
                      rewrite < sym_times.