X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Ftests%2Finversion2.ma;h=5fc9c93350c857d1c553cc844a9debcb200cff67;hb=5e4deb64b7cae2df0a51425e3768ca316c297953;hp=f3bc943aa230c491f3d11e84f0c4c65f7b31fc08;hpb=ca160266c4955d0cbdb66e1a24f2239e2839e215;p=helm.git diff --git a/matita/tests/inversion2.ma b/matita/tests/inversion2.ma index f3bc943aa..5fc9c9335 100644 --- a/matita/tests/inversion2.ma +++ b/matita/tests/inversion2.ma @@ -59,5 +59,5 @@ theorem test_inversion: \forall n. le n O \to n=O. (* elim H. BUG DI UNSHARING *) (*apply (ledx_ind (\lambda x.\lambda y. n=x \to O=y \to x=y) ? ? ? ? H).*) simplify. intros. reflexivity. - simplify. intros. discriminate H3. + simplify. intros. destruct H3. qed.