proposition: Lemma iscotrans_CDRap : ∏ x y z : X, x ≠ z -> x ≠ y ∨ y ≠ z.
proof: Proof. exact (pr2 (pr2 (pr1 (pr2 (pr1 (pr2 X)))))). Qed.
imports: UniMath.Algebra.DivisionRig UniMath.Algebra.Domains_and_Fields UniMath.Algebra.Apartness UniMath.MoreFoundations.Tactics