]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/matita/tests/fguidi.ma
version 0.7.1
[helm.git] / helm / matita / tests / fguidi.ma
index e42de00b50a9a530542696c461ae945caaa2459f..7163c56b390f28b0332910110c6494fe8716d93f 100644 (file)
@@ -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 x. auto.
+clear H. fwd H1 [H]. decompose H.
+*)
\ No newline at end of file