diff options
| -rw-r--r-- | theories/ZArith/fast_integer.v | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/theories/ZArith/fast_integer.v b/theories/ZArith/fast_integer.v index 4026ba2229..334dc050fb 100644 --- a/theories/ZArith/fast_integer.v +++ b/theories/ZArith/fast_integer.v @@ -1224,14 +1224,6 @@ Intros x y;Split; [ Trivial with arith Orelse (Intros H2;Discriminate H2)]))]. Qed. -Theorem le_minus: (i,h:nat) (le (minus i h) i). -Proof. -Intros i h;Pattern i h; Apply nat_double_ind; [ - Auto with arith -| Auto with arith -| Intros m n H; Simpl; Apply le_trans with m:=m; Auto with arith ]. -Qed. - Lemma ZL16: (p,q:positive)(lt (minus (convert p) (convert q)) (convert p)). Proof. Intros p q; Elim (ZL4 p);Elim (ZL4 q); Intros h H1 i H2; |