aboutsummaryrefslogtreecommitdiffhomepage
path: root/theories/Arith/Minus.v
diff options
context:
space:
mode:
authorGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2008-05-28 20:06:42 +0000
committerGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2008-05-28 20:06:42 +0000
commit1f195b9b69b12ace9152b5fc815417f29fe54245 (patch)
tree9833fddeae2867fea4cbbc52df7773a22ae28af0 /theories/Arith/Minus.v
parent133ce76b38344b062699cc418e59d400becf27b4 (diff)
- Modification de la déf de minus et pred conformément aux remarques de
Assia et Benjamin W. de telle sorte qu'ils respectent le critère de décroissance structurelle lorsqu'utilisés dans un point-fixe. - Ajout des noms "standard" des lemmes de Peano et correction d'un nom de BinInt. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11015 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Arith/Minus.v')
-rw-r--r--theories/Arith/Minus.v2
1 files changed, 1 insertions, 1 deletions
diff --git a/theories/Arith/Minus.v b/theories/Arith/Minus.v
index a3b102055..f5c3260de 100644
--- a/theories/Arith/Minus.v
+++ b/theories/Arith/Minus.v
@@ -12,7 +12,7 @@
<<
Fixpoint minus (n m:nat) {struct n} : nat :=
match n, m with
- | O, _ => 0
+ | O, _ => n
| S k, O => S k
| S k, S l => k - l
end