proposition: Lemma hzmodcompatplusr ( p : hz ) ( x : hzneq 0 p ) : forall a b c : hz, hzmod p x a b -> hzmod p x ( a + c ) ( b + c ).
proof: Proof. intros a b c v. rewrite hzpluscomm. rewrite ( hzpluscomm b ). apply hzmodcompatplusl. assumption. Defined.
imports: UniMath.PAdics.lemmas UniMath.NumberSystems.Integers UniMath.Foundations.Preamble