proposition: Lemma Rinv_0 : / 0 = 0.
proof: Proof. rewrite RinvImpl.Rinv_def. destruct (Req_appart_dec 0 R0) as [eq0 | [lt0 | gt0]]; try easy; now exfalso; apply (Rlt_irrefl 0). Qed.
imports: RelationClasses Raxioms Rpow_def ZArith ZArithRing RealField