proposition: Lemma add_max_distr_r n m p : max (n + p) (m + p) == max n m + p.
proof: Proof. destruct (le_ge_cases n m); [rewrite 2 max_r | rewrite 2 max_l]; now rewrite <- ?add_le_mono_r. Qed.
imports: ZAxioms ZMulOrder GenericMinMax