X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Ftests%2Fdemodulation_matita.ma;h=1556359ae7417ae0981bce328ec77839dbee6ed2;hb=5649890273cf8e660bba744e84ce5fee1e5efe69;hp=d1201a6c4490822e0ead098a58d0878fe092d838;hpb=b2a190e3c2d5b594d409db937e88f9f4f7d22b8c;p=helm.git

diff --git a/helm/software/matita/tests/demodulation_matita.ma b/helm/software/matita/tests/demodulation_matita.ma
index d1201a6c4..1556359ae 100644
--- a/helm/software/matita/tests/demodulation_matita.ma
+++ b/helm/software/matita/tests/demodulation_matita.ma
@@ -17,7 +17,8 @@
 include "nat/minus.ma".
 
 theorem p2: \forall x,y:nat. x+x = (S(S O))*x.
-intros.demodulate.reflexivity.
+intros.
+demodulate by times_n_Sm times_n_O sym_times plus_n_O.
 qed.
 
 theorem p4: \forall x:nat. (x+(S O))*(x-(S O))=x*x - (S O).