Module Import Private_Dec := MinMaxDecProperties O M.

(* Specifications: *)
Lemma max_case_strong : forall n m (P:t -> Type), (m<=n -> P n) -> (n<=m -> P m) -> P (max n m).
Lemma max_case : forall n m (P:t -> Type), P n -> P m -> P (max n m).
Lemma max_dec : forall n m, {max n m = n} + {max n m = m}.
Lemma min_case_strong : forall n m (P:O.t -> Type), (n<=m -> P n) -> (m<=n -> P m) -> P (min n m).
Lemma min_case : forall n m (P:O.t -> Type), P n -> P m -> P (min n m).
Lemma min_dec : forall n m, {min n m = n} + {min n m = m}.