obtain ⟨r, hr₁, hr₂⟩ := by simpa using hq;
α : Type u_1
inst✝² : DecidableEq α
inst✝¹ : Inhabited α
L : DeductionParameter α
inst✝ : L.Normal
Ω Ω₁ Ω₂ : MCT L
p : Formula α
n : ℕ
hp : □^[n]p ∉ Ω.theory
hC : { ctx := □''⁻¹^[n]Ω.theory } ⊢! p
Γ : List (Formula α)
hΓ₁ : ∀ q ∈ Γ, q ∈ □''⁻¹^[n]Ω.theory
hΓ₂ : Γ ⊢[L]! p
this✝ : L ⊢! □^[n]Γ.conj' ⟶ □^[n]p
this : ∀ (Δ : List (Formula α)), (∀ q ∈ Δ, q ∈ Ω.theory) → ¬Δ ⊢[L]! □^[n]p
q : Formula α
hq : q ∈ □'^[n]Γ
⊢ q ∈ Ω.theory
case intro.intro
α : Type u_1
inst✝² : DecidableEq α
inst✝¹ : Inhabited α
L : DeductionParameter α
inst✝ : L.Normal
Ω Ω₁ Ω₂ : MCT L
p : Formula α
n : ℕ
hp : □^[n]p ∉ Ω.theory
hC : { ctx := □''⁻¹^[n]Ω.theory } ⊢! p
Γ : List (Formula α)
hΓ₁ : ∀ q ∈ Γ, q ∈ □''⁻¹^[n]Ω.theory
hΓ₂ : Γ ⊢[L]! p
this✝ : L ⊢! □^[n]Γ.conj' ⟶ □^[n]p
this : ∀ (Δ : List (Formula α)), (∀ q ∈ Δ, q ∈ Ω.theory) → ¬Δ ⊢[L]! □^[n]p
q : Formula α
hq : q ∈ □'^[n]Γ
r : Formula α
hr₁ : r ∈ Γ
hr₂ : (UnaryModalOperator.mop true)^[n] r = q
⊢ q ∈ Ω.theory