have : toNat (1 : α) = 1 % 2^length α := toNat_ofNat 1
α : Type
inst✝¹ : (n : Nat) → OfNat α n
inst✝ : UInt α
a : α
⊢ (2 ^ length α - (toNat a + toNat 1) % 2 ^ length α) % 2 ^ length α = 2 ^ length α - (toNat a + 1)
α : Type
inst✝¹ : (n : Nat) → OfNat α n
inst✝ : UInt α
a : α
this : toNat 1 = 1 % 2 ^ length α
⊢ (2 ^ length α - (toNat a + toNat 1) % 2 ^ length α) % 2 ^ length α = 2 ^ length α - (toNat a + 1)