proposition: Lemma hzbooleqisi (i : hz) : hzbooleq i (i + 1) = false.
proof: Proof. apply negrtopaths. apply (negf (λ e, hzpluslcan _ _ _ (! (hzplusr0 i @ e)))); clear i. confirm_not_equal isdecrelhzeq. Qed.
imports: UniMath.Foundations.NaturalNumbers UniMath.MoreFoundations.PartA UniMath.MoreFoundations.NegativePropositions UniMath.Algebra.Monoids UniMath.Algebra.Groups UniMath.Algebra.RigsAndRings UniMath.NumberSystems.NaturalNumbersAlgebra