proposition: Lemma isnonzeroCDR : (1 : X) ≠ (0 : X).
proof: Proof. exact (pr1 (pr2 (pr2 (pr2 (pr2 X))))). Qed.
imports: UniMath.Algebra.DivisionRig UniMath.Algebra.Domains_and_Fields UniMath.Algebra.Apartness UniMath.MoreFoundations.Tactics