exact ⟨ihp (mem_maximalConsistentTheory_and hp).1, ihq (mem_maximalConsistentTheory_and hp).2⟩
α : Type u_1
Δ : Sequent α
T : Theory α
consisT : Consistent T
p q : Formula α
ihp : p ∈ maximalConsistentTheory consisT → { val := fun x => Formula.atom x ∈ maximalConsistentTheory consisT } ⊧ p
ihq : q ∈ maximalConsistentTheory consisT → { val := fun x => Formula.atom x ∈ maximalConsistentTheory consisT } ⊧ q
hp : p ⋏ q ∈ maximalConsistentTheory consisT
⊢ { val := fun x => Formula.atom x ∈ maximalConsistentTheory consisT } ⊧ p ∧
    { val := fun x => Formula.atom x ∈ maximalConsistentTheory consisT } ⊧ q
no goals