]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/contribs/RELATIONAL/NLE/dec.ma
some improvements
[helm.git] / helm / software / matita / contribs / RELATIONAL / NLE / dec.ma
index 7c45ab488d45897055e31cea808baec2afae5587..918acfe53e25a93d459e91298d5f9bb332299564 100644 (file)
@@ -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 timeout=100
+ [ auto
  | decompose;
-   [ lapply linear nle_gen_succ_1 to H1. decompose.
-     subst. auto new timeout=100 depth=4
+   [ lapply linear nle_inv_succ_1 to H1. decompose.
+     subst. auto depth=4
    | lapply linear nle_lt_or_eq to H1; decompose;
-     subst; auto new timeout=100
+     subst; auto
    ]
  ].
 qed.