rw [←hk]
n : Nat
p : Fin n → Bool
i : Nat
hi✝ : i ≤ n
k : Fin n
hik : i ≤ ↑k
hne : ¬i = n
hi : i < n
hp : ¬p ⟨i, ⋯⟩ = true
h : loop p (i + 1) ⋯ = none
heq : i = ↑k
hk : p k = true
⊢ p ⟨i, ⋯⟩ = true
n : Nat
p : Fin n → Bool
i : Nat
hi✝ : i ≤ n
k : Fin n
hik : i ≤ ↑k
hne : ¬i = n
hi : i < n
hp : ¬p ⟨i, ⋯⟩ = true
h : loop p (i + 1) ⋯ = none
heq : i = ↑k
hk : p k = true
⊢ p ⟨i, ⋯⟩ = p k