Metamath Proof Explorer


Theorem lhpexle1lem

Description: Lemma for lhpexle1 and others that eliminates restrictions on X . (Contributed by NM, 24-Jul-2013)

Ref Expression
Hypotheses lhpexle1lem.1 ⊢ φ → ∃ p ∈ A p ≤ ˙ W ∧ ψ
lhpexle1lem.2 ⊢ φ ∧ X ∈ A ∧ X ≤ ˙ W → ∃ p ∈ A p ≤ ˙ W ∧ ψ ∧ p ≠ X
Assertion lhpexle1lem ⊢ φ → ∃ p ∈ A p ≤ ˙ W ∧ ψ ∧ p ≠ X

Proof

Step Hyp Ref Expression
1 lhpexle1lem.1 ⊢ φ → ∃ p ∈ A p ≤ ˙ W ∧ ψ
2 lhpexle1lem.2 ⊢ φ ∧ X ∈ A ∧ X ≤ ˙ W → ∃ p ∈ A p ≤ ˙ W ∧ ψ ∧ p ≠ X
3 1 adantr ⊢ φ ∧ ¬ X ∈ A → ∃ p ∈ A p ≤ ˙ W ∧ ψ
4 simprl ⊢ φ ∧ ¬ X ∈ A ∧ p ∈ A ∧ p ≤ ˙ W ∧ ψ → p ≤ ˙ W
5 simprr ⊢ φ ∧ ¬ X ∈ A ∧ p ∈ A ∧ p ≤ ˙ W ∧ ψ → ψ
6 simplr ⊢ φ ∧ ¬ X ∈ A ∧ p ∈ A ∧ p ≤ ˙ W ∧ ψ → p ∈ A
7 simpllr ⊢ φ ∧ ¬ X ∈ A ∧ p ∈ A ∧ p ≤ ˙ W ∧ ψ → ¬ X ∈ A
8 nelne2 ⊢ p ∈ A ∧ ¬ X ∈ A → p ≠ X
9 6 7 8 syl2anc ⊢ φ ∧ ¬ X ∈ A ∧ p ∈ A ∧ p ≤ ˙ W ∧ ψ → p ≠ X
10 4 5 9 3jca ⊢ φ ∧ ¬ X ∈ A ∧ p ∈ A ∧ p ≤ ˙ W ∧ ψ → p ≤ ˙ W ∧ ψ ∧ p ≠ X
11 10 ex ⊢ φ ∧ ¬ X ∈ A ∧ p ∈ A → p ≤ ˙ W ∧ ψ → p ≤ ˙ W ∧ ψ ∧ p ≠ X
12 11 reximdva ⊢ φ ∧ ¬ X ∈ A → ∃ p ∈ A p ≤ ˙ W ∧ ψ → ∃ p ∈ A p ≤ ˙ W ∧ ψ ∧ p ≠ X
13 3 12 mpd ⊢ φ ∧ ¬ X ∈ A → ∃ p ∈ A p ≤ ˙ W ∧ ψ ∧ p ≠ X
14 1 adantr ⊢ φ ∧ ¬ X ≤ ˙ W → ∃ p ∈ A p ≤ ˙ W ∧ ψ
15 simprl ⊢ φ ∧ ¬ X ≤ ˙ W ∧ p ≤ ˙ W ∧ ψ → p ≤ ˙ W
16 simprr ⊢ φ ∧ ¬ X ≤ ˙ W ∧ p ≤ ˙ W ∧ ψ → ψ
17 simplr ⊢ φ ∧ ¬ X ≤ ˙ W ∧ p ≤ ˙ W ∧ ψ → ¬ X ≤ ˙ W
18 nbrne2 ⊢ p ≤ ˙ W ∧ ¬ X ≤ ˙ W → p ≠ X
19 15 17 18 syl2anc ⊢ φ ∧ ¬ X ≤ ˙ W ∧ p ≤ ˙ W ∧ ψ → p ≠ X
20 15 16 19 3jca ⊢ φ ∧ ¬ X ≤ ˙ W ∧ p ≤ ˙ W ∧ ψ → p ≤ ˙ W ∧ ψ ∧ p ≠ X
21 20 ex ⊢ φ ∧ ¬ X ≤ ˙ W → p ≤ ˙ W ∧ ψ → p ≤ ˙ W ∧ ψ ∧ p ≠ X
22 21 reximdv ⊢ φ ∧ ¬ X ≤ ˙ W → ∃ p ∈ A p ≤ ˙ W ∧ ψ → ∃ p ∈ A p ≤ ˙ W ∧ ψ ∧ p ≠ X
23 14 22 mpd ⊢ φ ∧ ¬ X ≤ ˙ W → ∃ p ∈ A p ≤ ˙ W ∧ ψ ∧ p ≠ X
24 13 23 2 pm2.61dda ⊢ φ → ∃ p ∈ A p ≤ ˙ W ∧ ψ ∧ p ≠ X