X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2Ftests%2Ffguidi.ma;h=274cda0275df683d226652489060d790a4d1da56;hb=49734f6f824dd310520cbb0cee0e605296e2d975;hp=fc2c717eba684ff02a14ef0f1819e8956238d7e0;hpb=ebaf3deffea9ac78a2b8b2a6c128cc24ad8459ef;p=helm.git

diff --git a/helm/matita/tests/fguidi.ma b/helm/matita/tests/fguidi.ma
index fc2c717eb..274cda027 100644
--- a/helm/matita/tests/fguidi.ma
+++ b/helm/matita/tests/fguidi.ma
@@ -1,4 +1,4 @@
-set "baseuri" "cic:/matita/tests/".
+set "baseuri" "cic:/matita/tests/fguidi/".
 
 alias id "O" = "cic:/Coq/Init/Datatypes/nat.ind#xpointer(1/1/1)".
 alias id "nat" = "cic:/Coq/Init/Datatypes/nat.ind#xpointer(1/1)".
@@ -92,7 +92,7 @@ intros. auto.
 qed.
 (*
 theorem le_trans: \forall x,y. (le x y) \to \forall z. (le y z) \to (le x z).
-intros 1.
-elim x. auto.
-fwd H1 [].
-*)
+intros 1. elim x. 
+clear H. auto.
+clear H. fwd H1 [H]. decompose H.
+*)
\ No newline at end of file