X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcontribs%2FRELATIONAL%2FNLE%2Fdec.ma;h=7c45ab488d45897055e31cea808baec2afae5587;hb=1eb77ed6774cb642e763182e900f143a0184e085;hp=3b4e0203a9effc42642bc2bbfa8ff55b388390bf;hpb=648f1521fa36f3c19cca3b3a29bbf3e8146eca4e;p=helm.git diff --git a/matita/contribs/RELATIONAL/NLE/dec.ma b/matita/contribs/RELATIONAL/NLE/dec.ma index 3b4e0203a..7c45ab488 100644 --- a/matita/contribs/RELATIONAL/NLE/dec.ma +++ b/matita/contribs/RELATIONAL/NLE/dec.ma @@ -18,12 +18,12 @@ include "NLE/props.ma". theorem nat_dec_lt_ge: \forall x,y. x < y \lor y <= x. intros 2; elim y; clear y; - [ auto new + [ auto new timeout=100 | decompose; [ lapply linear nle_gen_succ_1 to H1. decompose. - subst. auto new depth=4 + subst. auto new timeout=100 depth=4 | lapply linear nle_lt_or_eq to H1; decompose; - subst; auto new + subst; auto new timeout=100 ] ]. qed.