diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-04-17 11:30:23 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-04-17 11:30:23 +0000 |
commit | cc1be0bf512b421336e81099aa6906ca47e4257a (patch) | |
tree | c25fa8ed965729d7a85efa3b3292fdf7f442963d /theories/Arith/Minus.v | |
parent | ebf9aa9f97ef0d49ed1b799c9213f78efad4fec7 (diff) |
Uniformisation (Qed/Save et Implicits Arguments)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2650 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Arith/Minus.v')
-rwxr-xr-x | theories/Arith/Minus.v | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/theories/Arith/Minus.v b/theories/Arith/Minus.v index 417629621..0f435a560 100755 --- a/theories/Arith/Minus.v +++ b/theories/Arith/Minus.v @@ -50,7 +50,7 @@ Hints Immediate plus_minus : arith v62. Lemma minus_plus : (n,m:nat)(minus (plus n m) n)=m. Symmetry; Auto with arith. -Save. +Qed. Hints Resolve minus_plus : arith v62. Lemma le_plus_minus : (n,m:nat)(le n m)->(m=(plus n (minus m n))). @@ -93,7 +93,7 @@ Hints Immediate lt_O_minus_lt : arith v62. Theorem pred_of_minus : (x:nat)(pred x)=(minus x (S O)). NewInduction x; Auto with arith. -Save. +Qed. Theorem inj_minus_aux: (x,y:nat) ~(le y x) -> (minus x y) = O. @@ -102,4 +102,4 @@ Intros y x; Pattern y x ; Apply nat_double_ind; [ | Intros n H; Absurd (le O (S n)); [ Assumption | Apply le_O_n] | Simpl; Intros n m H1 H2; Apply H1; Unfold not ; Intros H3; Apply H2; Apply le_n_S; Assumption]. -Save. +Qed. |