X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Ftests%2Fdecl.ma;h=40f8d3700b0e907d8d30bc8dd78369f7c3558862;hb=73044fcac2ab47e6c9819c572f6bbd2b1e0f2a40;hp=4b67f551ab6821646c7bda52a445f646504916b4;hpb=0fadcf36d82e4ed816a50db09dfd1559a8507e6c;p=helm.git diff --git a/helm/software/matita/tests/decl.ma b/helm/software/matita/tests/decl.ma index 4b67f551a..40f8d3700 100644 --- a/helm/software/matita/tests/decl.ma +++ b/helm/software/matita/tests/decl.ma @@ -114,11 +114,7 @@ theorem easy3: ∀A:Prop. (A ∧ ∃n:nat.n ≠ n) → True. assume P: Prop. suppose (P ∧ ∃m:nat.m ≠ m) (H). by H we have P (H1) and (∃x:nat.x≠x) (H2). - (*BUG: by H2 let q:nat such that (q ≠ q) (Ineq). - *) - (* the next line is wrong, but for the moment it does the job *) - by H2 let q:nat such that False (Ineq). by I done. qed.