proposition: Lemma R_of_Q1 (R : unitRingType) : R_of_Q 1 = 1 :> R.
proof: Proof. by rewrite /R_of_Q divr1. Qed.
imports: elpi(elpi) Coq(QArith) Coq.micromega(OrderedRing RingMicromega) mathcomp(all_ssreflect ssralg ssrnum ssrint) mathcomp.zify(ssrZ zify)