From e30d9e19b4b12ea9388b13d7c1ab2ffc5aba4917 Mon Sep 17 00:00:00 2001
From: David Benjamin <davidben@google.com>
Date: Sun, 14 Jan 2018 15:26:39 +0100
Subject: Add a comment for why Z.peano_rect_strong exists.

---
 src/Util/ZUtil/Peano.v | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'src/Util/ZUtil')

diff --git a/src/Util/ZUtil/Peano.v b/src/Util/ZUtil/Peano.v
index d0ba81ef4..fb534ba0b 100644
--- a/src/Util/ZUtil/Peano.v
+++ b/src/Util/ZUtil/Peano.v
@@ -34,6 +34,9 @@ Module Z.
     rewrite Pos.add_1_r; reflexivity.
   Qed.
 
+  (** [Z.peano_rect] does not provide the [0 <= z] and [z <= 0] hypotheses in
+      [Psucc] and [Ppred]. Define an alternate version for proofs which require
+      that. *)
   Section rect_strong.
     Context (P : Z -> Type)
             (P0 : P 0)
-- 
cgit v1.2.3