obtain ⟨q, _, hq₂⟩ := forall_multimop_of_subset_multimop h p hp
case a
ι : Type u_2
F : Type u_1
inst✝¹ : UnaryModalOperator ι F
inst✝ : DecidableEq F
i : ι
n : ℕ
p✝ q : F
s t : Set F
h : s ⊆ Set.multimop i n t
p : F
hp : p ∈ s
⊢ p ∈ Set.multimop i n (Set.premultimop i n s)
case a.intro.intro
ι : Type u_2
F : Type u_1
inst✝¹ : UnaryModalOperator ι F
inst✝ : DecidableEq F
i : ι
n : ℕ
p✝ q✝ : F
s t : Set F
h : s ⊆ Set.multimop i n t
p : F
hp : p ∈ s
q : F
left✝ : q ∈ t
hq₂ : p = (mop i)^[n] q
⊢ p ∈ Set.multimop i n (Set.premultimop i n s)