proposition: Lemma Qeq_Zeq (a b: Z): (inject_Z a == inject_Z b) = (a = b).
proof: Proof. unfold Qeq. simpl. intros. do 2 rewrite Zmult_1_r. reflexivity. Qed.
imports: Coq.QArith.QArith Coq.ZArith.ZArith Coq.NArith.NArith Coq.QArith.Qpower Coq.QArith.Qround Coq.QArith.Qround Coq.QArith.Qabs CoRN.stdlib_omissions.List