proposition: Theorem samePolRzEqRz : forall p q : rZ, eqRz (samePolRz p q) q.
proof: Proof. intros p; case p; auto with stalmarck. Qed.
imports: Stalmarck(sTactic) Coq(Relation_Definitions) Coq(ZArith) Coq(Inverse_Image) Coq(Inclusion) Coq(Wf_nat) Coq(List)