Lemma iscotrans_CCDRap : ∏ x y z : X, x ≠ z → x ≠ y ∨ y ≠ z. Proof. exact (iscotrans_CDRap (X := ConstructiveCommutativeDivisionRig_ConstructiveDivisionRig X)). Qed.
Require Import UniMath.MoreFoundations.Tactics.