X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Ftests%2Fdemodulation_matita.ma;h=1556359ae7417ae0981bce328ec77839dbee6ed2;hb=e880d6eab5e1700f4a625ddcd7d0fa8f0cce2dcc;hp=0f4827e462239248826e77bcaba84fdf61f7c504;hpb=55b82bd235d82ff7f0a40d980effe1efde1f5073;p=helm.git

diff --git a/helm/software/matita/tests/demodulation_matita.ma b/helm/software/matita/tests/demodulation_matita.ma
index 0f4827e46..1556359ae 100644
--- a/helm/software/matita/tests/demodulation_matita.ma
+++ b/helm/software/matita/tests/demodulation_matita.ma
@@ -12,12 +12,13 @@
 (*                                                                        *)
 (**************************************************************************)
 
-set "baseuri" "cic:/matita/demodulation_matita/".
+
 
 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).