def internal_u32_inc_wrap
import bend-mathlib@0.8.1.0/u32.bend as U32import Base
677def internal_u32_inc_wrap(-m: Nat, a: U32, e: {Nat.pow(2n, 32n) == m : Nat}) -> {U32.to_nat(U32.inc(a)) == Nat.mod(1n+U32.to_nat(a), m) : Nat}:
678 match a:
679 case U32{+w}:
680 %e : {Word.to_nat(32n, Word.inc(32n, w)) == Nat.mod(1n+Word.to_nat(32n, w), _) : Nat}
681 word_inc_wrap(32n, w)