proposition: Lemma hzqrand0ineq ( p : hz ) ( x : hzneq 0 p ) : hzleh 0 0 × hzlth 0 ( nattohz ( hzabsval p ) ).
proof: Proof. intros. split. - apply isreflhzleh. - apply lemmas.hzabsvalneq0. assumption. Defined.
imports: UniMath.PAdics.lemmas UniMath.NumberSystems.Integers UniMath.Foundations.Preamble