obtain ⟨t, ht, hst⟩ := hK.exists_facet hs
case refine'_1
𝕜 : Type u_1
E : Type u_2
inst✝² : OrderedRing 𝕜
inst✝¹ : AddCommGroup E
inst✝ : Module 𝕜 E
a b n k : ℕ
K : SimplicialComplex 𝕜 E
s✝ : Finset E
hK : K.Pure n
s : Finset E
hs : s ∈ K
⊢ ∃ t ∈ K, t.card = n + 1 ∧ s ⊆ t
case refine'_1.intro.intro
𝕜 : Type u_1
E : Type u_2
inst✝² : OrderedRing 𝕜
inst✝¹ : AddCommGroup E
inst✝ : Module 𝕜 E
a b n k : ℕ
K : SimplicialComplex 𝕜 E
s✝ : Finset E
hK : K.Pure n
s : Finset E
hs : s ∈ K
t : Finset E
ht : t ∈ K.facets
hst : s ⊆ t
⊢ ∃ t ∈ K, t.card = n + 1 ∧ s ⊆ t