proposition: Lemma islunit_CDRone_CDRmult : ∏ x : X, 1 * x = x.
proof: Proof. now apply riglunax2. Qed.
imports: UniMath.Algebra.DivisionRig UniMath.Algebra.Domains_and_Fields UniMath.Algebra.Apartness UniMath.MoreFoundations.Tactics