rw [←ofNat_toNat a, toNat_ofNat]
α : Type
inst✝¹ : (n : Nat) → OfNat α n
inst✝ : UInt α
a : α
⊢ toNat a < 2 ^ length α
α : Type
inst✝¹ : (n : Nat) → OfNat α n
inst✝ : UInt α
a : α
⊢ toNat a % 2 ^ length α < 2 ^ length α