Hint Resolve repr_signed: ints.
Opaque repr.

(* Specifications: *)
Lemma eqm_repr_eq: forall x y, eqm x (unsigned y) -> repr x = y.
Theorem unsigned_repr:
forall z, 0 <= z <= max_unsigned -> unsigned (repr z) = z.
Lemma eqm_repr_eq: forall x y, eqm x (unsigned y) -> repr x = y.
Theorem unsigned_repr:
forall z, 0 <= z <= max_unsigned -> unsigned (repr z) = z.