From 538e541709d70caaa78104739cb965c6523d89a8 Mon Sep 17 00:00:00 2001 From: Jason Gross Date: Tue, 15 Jan 2019 15:46:35 -0500 Subject: Add some more basic ZRange lemmas --- src/Util/ZRange/BasicLemmas.v | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'src/Util') diff --git a/src/Util/ZRange/BasicLemmas.v b/src/Util/ZRange/BasicLemmas.v index 83dbcde7e..1098a68eb 100644 --- a/src/Util/ZRange/BasicLemmas.v +++ b/src/Util/ZRange/BasicLemmas.v @@ -193,4 +193,12 @@ Module ZRange. Lemma is_bounded_by_bool_normalize_constant v : is_bounded_by_bool v (ZRange.normalize (ZRange.constant v)) = true. Proof. repeat t2_step. Qed. + + Lemma is_bounded_by_bool_constant_iff v1 v2 + : is_bounded_by_bool v1 (ZRange.constant v2) = true <-> v1 = v2. + Proof. repeat t2_step. Qed. + + Lemma is_bounded_by_bool_normalize_constant_iff v1 v2 + : is_bounded_by_bool v1 (ZRange.normalize (ZRange.constant v2)) = true <-> v1 = v2. + Proof. repeat t2_step. Qed. End ZRange. -- cgit v1.2.3