obtain ⟨_, e⟩ := hVer
case mp.hMaxm.inr
α : Type u_1
inst✝ : DecidableEq α
p p✝ : Formula α
h : 𝐕𝐞𝐫 ⊢! p✝
hVer : p✝ ∈ 𝗩𝗲𝗿
⊢ 𝐂𝐥 ⊢! (p✝ⱽᴾ) ⋯
case mp.hMaxm.inr.intro
α : Type u_1
inst✝ : DecidableEq α
p p✝ : Formula α
h : 𝐕𝐞𝐫 ⊢! p✝
w✝ : Formula α
e : Axioms.Ver w✝ = p✝
⊢ 𝐂𝐥 ⊢! (p✝ⱽᴾ) ⋯