simp [LogicalConnective.ball, LogicalConnective.bex] at hr
case dummy_pi
L : Language
inst✝ : L.LT
μ : Type v
n : ℕ
p : Semiformula L μ (n + 1)
s✝ : ℕ
hb : 𝚺 = 𝚷
p✝ : Semiformula L μ (n + 1)
a✝ : Hierarchy 𝚺 (s✝ + 1) p✝
hr : ∃' p = ∃' p✝
⊢ Hierarchy 𝚷 (s✝ + 1 + 1) p
case dummy_pi
L : Language
inst✝ : L.LT
μ : Type v
n : ℕ
p : Semiformula L μ (n + 1)
s✝ : ℕ
hb : 𝚺 = 𝚷
p✝ : Semiformula L μ (n + 1)
a✝ : Hierarchy 𝚺 (s✝ + 1) p✝
hr : p = p✝
⊢ Hierarchy 𝚷 (s✝ + 1 + 1) p