open List.Index in rw [iotaFind, val_tail, val_map, H, Fin.succ]
case a
n✝ n : Nat
H : ∀ (i : Fin n), i.iotaFind.val = i
i✝ : Fin (n + 1)
i : Nat
hi : i + 1 < n + 1
⊢ ↑⟨i + 1, hi⟩.iotaFind.val = ↑⟨i + 1, hi⟩
no goals