proposition: Lemma join_r x y : x ≤ y → x ⊔ y = y.
proof: Proof. intros E. rewrite commutativity. now apply join_l. Qed.
imports: MathClasses.interfaces.abstract_algebra MathClasses.interfaces.orders MathClasses.orders.maps MathClasses.theory.lattices