aboutsummaryrefslogtreecommitdiff
path: root/mathcomp
diff options
context:
space:
mode:
authorCyril Cohen2020-08-28 16:17:07 +0200
committerGitHub2020-08-28 16:17:07 +0200
commit1d48732459725993cf26b88c4b4f7aad6dd8a2be (patch)
tree5966ca239532ceb15e3436f0c49ae23ced61ccf2 /mathcomp
parente725070f9809a7d63f063a359dd7ef6bd3800dfd (diff)
parentd56db9d3a6c098055ebea57557c1d1aaf6f0c9b6 (diff)
Merge pull request #556 from CohenCyril/oddS
Adding lemma `oddS`
Diffstat (limited to 'mathcomp')
-rw-r--r--mathcomp/ssreflect/ssrnat.v2
1 files changed, 2 insertions, 0 deletions
diff --git a/mathcomp/ssreflect/ssrnat.v b/mathcomp/ssreflect/ssrnat.v
index 90b1f1d..8b4d39f 100644
--- a/mathcomp/ssreflect/ssrnat.v
+++ b/mathcomp/ssreflect/ssrnat.v
@@ -1252,6 +1252,8 @@ Proof. by rewrite mulnC mulnbl. Qed.
Fixpoint odd n := if n is n'.+1 then ~~ odd n' else false.
+Lemma oddS n : odd n.+1 = ~~ odd n. Proof. by []. Qed.
+
Lemma oddb (b : bool) : odd b = b. Proof. by case: b. Qed.
Lemma oddD m n : odd (m + n) = odd m (+) odd n.