contradiction
n : Nat
ih :
  ∀ (p : Fin n → Prop) [inst : DecidablePred p] (k : Fin (count p)) (i : { i // p i }),
    decodeSubtype p k = i ↔ encodeSubtype p i = k
p : Fin (n + 1) → Prop
inst : DecidablePred p
k : Fin (count p)
i : { i // p i }
h0 : ¬p 0
this : count p = count fun i => p i.succ
val✝ : Nat
isLt✝¹ : val✝ < count p
isLt✝ : 0 < n + 1
property✝ : p ⟨0, isLt✝⟩
h : ⟨⟨↑(decodeSubtype (fun i => p i.succ) ⟨↑⟨val✝, isLt✝¹⟩, ⋯⟩).1 + 1, ⋯⟩, ⋯⟩ = ⟨⟨0, isLt✝⟩, property✝⟩
⊢ encodeSubtype p ⟨⟨0, isLt✝⟩, property✝⟩ = ⟨val✝, isLt✝¹⟩
no goals