. intro h; cases h
case mp
α : Type
inst✝¹ : (n : Nat) → OfNat α n
inst✝ : UInt α
a : α
i : Nat
⊢ i ∈ bitIndices.aux a Nat.zero → i < Nat.zero ∧ UInt.getBit a i = true

case mpr
α : Type
inst✝¹ : (n : Nat) → OfNat α n
inst✝ : UInt α
a : α
i : Nat
⊢ i < Nat.zero ∧ UInt.getBit a i = true → i ∈ bitIndices.aux a Nat.zero
case mpr
α : Type
inst✝¹ : (n : Nat) → OfNat α n
inst✝ : UInt α
a : α
i : Nat
⊢ i < Nat.zero ∧ UInt.getBit a i = true → i ∈ bitIndices.aux a Nat.zero