simp only [Nat.mod_eq_of_lt this, Nat.succ_sub_one]
α : Type
inst✝¹ : (n : Nat) → OfNat α n
inst✝ : UInt α
a : α
hlength✝ : ¬length α = 0
hlength : length α > 0
this✝¹ : 1 % 2 ^ length α = 1
n : Nat
ha : toNat a = Nat.succ n
this✝ : Nat.succ n + (2 ^ length α - 1) = n + 2 ^ length α
this : n < 2 ^ length α
⊢ Nat.succ n &&& n % 2 ^ length α = Nat.succ n &&& Nat.succ n - 1
no goals