- transcript: bugfix

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

diff --git a/helm/software/matita/library/nat/chebyshev_teta.ma b/helm/software/matita/library/nat/chebyshev_teta.ma
index 1765b38072626e02bd6593da9f31654ac0c36d22..1bb493f79c53010261116c3e7234df843700ab92 100644 (file)
--- a/helm/software/matita/library/nat/chebyshev_teta.ma
+++ b/helm/software/matita/library/nat/chebyshev_teta.ma
@@ -162,7 +162,7 @@ elim (bc2 (S(2*m)) m)
   [unfold bc.rewrite > H3.
    rewrite > sym_times.
    rewrite > lt_O_to_div_times
-    [elim (divides_times_to_divides p (m!*(S (2*m)-m)!) n2)
+    [elim (divides_times_to_divides p (m!*(S (2*m)-m)!) n1)
       [apply False_ind.
        elim (divides_times_to_divides p (m!) (S (2*m)-m)!)
         [apply (lt_to_not_le ? ? (lt_to_le ? ? H1)).