Lemma hzmodisrefl ( p : hz ) ( x : hzneq 0 p ) : isrefl ( hzmod p x ). Proof. intros. unfold isrefl. intro n. unfold hzmod. assert ( hzremaindermod p x n = hzremaindermod p x n ) as a by apply idpath. apply a. Defined.
Require Import UniMath.PAdics.lemmas. Require Import UniMath.NumberSystems.Integers. Require Import UniMath.Foundations.Preamble.