diff options
Diffstat (limited to 'theories/ZArith')
| -rw-r--r-- | theories/ZArith/Zmax.v | 5 | ||||
| -rw-r--r-- | theories/ZArith/Zmin.v | 5 |
2 files changed, 10 insertions, 0 deletions
diff --git a/theories/ZArith/Zmax.v b/theories/ZArith/Zmax.v index 413b685a27..b7911181f3 100644 --- a/theories/ZArith/Zmax.v +++ b/theories/ZArith/Zmax.v @@ -81,6 +81,11 @@ Proof. intros; apply Zmax_case; assumption. Qed. +Lemma Zmax_lub_lt : forall n m p:Z, n < p -> m < p -> Zmax n m < p. +Proof. + intros; apply Zmax_case; assumption. +Qed. + (** * Semi-lattice properties of max *) Lemma Zmax_idempotent : forall n:Z, Zmax n n = n. diff --git a/theories/ZArith/Zmin.v b/theories/ZArith/Zmin.v index fa454fa96e..c406a15426 100644 --- a/theories/ZArith/Zmin.v +++ b/theories/ZArith/Zmin.v @@ -74,6 +74,11 @@ Proof. intros; apply Zmin_case; assumption. Qed. +Lemma Zmin_glb_lt : forall n m p:Z, p < n -> p < m -> p < Zmin n m. +Proof. + intros; apply Zmin_case; assumption. +Qed. + (** * Semi-lattice properties of min *) Lemma Zmin_idempotent : forall n:Z, Zmin n n = n. |