Theorem lhpexle1lem 38021

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

Hypotheses

Ref	Expression
lhpexle1lem.1	⊢ (𝜑 → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝜓))
lhpexle1lem.2	⊢ ((𝜑 ∧ (𝑋 ∈ 𝐴 ∧ 𝑋 ≤ 𝑊)) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝜓 ∧ 𝑝 ≠ 𝑋))

Assertion

Ref	Expression
lhpexle1lem	⊢ (𝜑 → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝜓 ∧ 𝑝 ≠ 𝑋))

Distinct variable groups:   ≤ ,𝑝   𝐴,𝑝   𝑊,𝑝   𝑋,𝑝   𝜑,𝑝

Allowed substitution hint:   𝜓(𝑝)

Proof of Theorem lhpexle1lem

Step	Hyp	Ref	Expression
1		lhpexle1lem.1	. . . 4 ⊢ (𝜑 → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝜓))
2	1	adantr 481	. . 3 ⊢ ((𝜑 ∧ ¬ 𝑋 ∈ 𝐴) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝜓))
3		simprl 768	. . . . . 6 ⊢ ((((𝜑 ∧ ¬ 𝑋 ∈ 𝐴) ∧ 𝑝 ∈ 𝐴) ∧ (𝑝 ≤ 𝑊 ∧ 𝜓)) → 𝑝 ≤ 𝑊)
4		simprr 770	. . . . . 6 ⊢ ((((𝜑 ∧ ¬ 𝑋 ∈ 𝐴) ∧ 𝑝 ∈ 𝐴) ∧ (𝑝 ≤ 𝑊 ∧ 𝜓)) → 𝜓)
5		simplr 766	. . . . . . 7 ⊢ ((((𝜑 ∧ ¬ 𝑋 ∈ 𝐴) ∧ 𝑝 ∈ 𝐴) ∧ (𝑝 ≤ 𝑊 ∧ 𝜓)) → 𝑝 ∈ 𝐴)
6		simpllr 773	. . . . . . 7 ⊢ ((((𝜑 ∧ ¬ 𝑋 ∈ 𝐴) ∧ 𝑝 ∈ 𝐴) ∧ (𝑝 ≤ 𝑊 ∧ 𝜓)) → ¬ 𝑋 ∈ 𝐴)
7		nelne2 3042	. . . . . . 7 ⊢ ((𝑝 ∈ 𝐴 ∧ ¬ 𝑋 ∈ 𝐴) → 𝑝 ≠ 𝑋)
8	5, 6, 7	syl2anc 584	. . . . . 6 ⊢ ((((𝜑 ∧ ¬ 𝑋 ∈ 𝐴) ∧ 𝑝 ∈ 𝐴) ∧ (𝑝 ≤ 𝑊 ∧ 𝜓)) → 𝑝 ≠ 𝑋)
9	3, 4, 8	3jca 1127	. . . . 5 ⊢ ((((𝜑 ∧ ¬ 𝑋 ∈ 𝐴) ∧ 𝑝 ∈ 𝐴) ∧ (𝑝 ≤ 𝑊 ∧ 𝜓)) → (𝑝 ≤ 𝑊 ∧ 𝜓 ∧ 𝑝 ≠ 𝑋))
10	9	ex 413	. . . 4 ⊢ (((𝜑 ∧ ¬ 𝑋 ∈ 𝐴) ∧ 𝑝 ∈ 𝐴) → ((𝑝 ≤ 𝑊 ∧ 𝜓) → (𝑝 ≤ 𝑊 ∧ 𝜓 ∧ 𝑝 ≠ 𝑋)))
11	10	reximdva 3203	. . 3 ⊢ ((𝜑 ∧ ¬ 𝑋 ∈ 𝐴) → (∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝜓) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝜓 ∧ 𝑝 ≠ 𝑋)))
12	2, 11	mpd 15	. 2 ⊢ ((𝜑 ∧ ¬ 𝑋 ∈ 𝐴) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝜓 ∧ 𝑝 ≠ 𝑋))
13	1	adantr 481	. . 3 ⊢ ((𝜑 ∧ ¬ 𝑋 ≤ 𝑊) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝜓))
14		simprl 768	. . . . . 6 ⊢ (((𝜑 ∧ ¬ 𝑋 ≤ 𝑊) ∧ (𝑝 ≤ 𝑊 ∧ 𝜓)) → 𝑝 ≤ 𝑊)
15		simprr 770	. . . . . 6 ⊢ (((𝜑 ∧ ¬ 𝑋 ≤ 𝑊) ∧ (𝑝 ≤ 𝑊 ∧ 𝜓)) → 𝜓)
16		simplr 766	. . . . . . 7 ⊢ (((𝜑 ∧ ¬ 𝑋 ≤ 𝑊) ∧ (𝑝 ≤ 𝑊 ∧ 𝜓)) → ¬ 𝑋 ≤ 𝑊)
17		nbrne2 5094	. . . . . . 7 ⊢ ((𝑝 ≤ 𝑊 ∧ ¬ 𝑋 ≤ 𝑊) → 𝑝 ≠ 𝑋)
18	14, 16, 17	syl2anc 584	. . . . . 6 ⊢ (((𝜑 ∧ ¬ 𝑋 ≤ 𝑊) ∧ (𝑝 ≤ 𝑊 ∧ 𝜓)) → 𝑝 ≠ 𝑋)
19	14, 15, 18	3jca 1127	. . . . 5 ⊢ (((𝜑 ∧ ¬ 𝑋 ≤ 𝑊) ∧ (𝑝 ≤ 𝑊 ∧ 𝜓)) → (𝑝 ≤ 𝑊 ∧ 𝜓 ∧ 𝑝 ≠ 𝑋))
20	19	ex 413	. . . 4 ⊢ ((𝜑 ∧ ¬ 𝑋 ≤ 𝑊) → ((𝑝 ≤ 𝑊 ∧ 𝜓) → (𝑝 ≤ 𝑊 ∧ 𝜓 ∧ 𝑝 ≠ 𝑋)))
21	20	reximdv 3202	. . 3 ⊢ ((𝜑 ∧ ¬ 𝑋 ≤ 𝑊) → (∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝜓) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝜓 ∧ 𝑝 ≠ 𝑋)))
22	13, 21	mpd 15	. 2 ⊢ ((𝜑 ∧ ¬ 𝑋 ≤ 𝑊) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝜓 ∧ 𝑝 ≠ 𝑋))
23		lhpexle1lem.2	. 2 ⊢ ((𝜑 ∧ (𝑋 ∈ 𝐴 ∧ 𝑋 ≤ 𝑊)) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝜓 ∧ 𝑝 ≠ 𝑋))
24	12, 22, 23	pm2.61dda 812	1 ⊢ (𝜑 → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑊 ∧ 𝜓 ∧ 𝑝 ≠ 𝑋))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 396   ∧ w3a 1086   ∈ wcel 2106   ≠ wne 2943  ∃wrex 3065   class class class wbr 5074

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-ext 2709

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-sb 2068  df-clab 2716  df-cleq 2730  df-clel 2816  df-ne 2944  df-rex 3070  df-rab 3073  df-v 3434  df-dif 3890  df-un 3892  df-nul 4257  df-if 4460  df-sn 4562  df-pr 4564  df-op 4568  df-br 5075

This theorem is referenced by:  lhpexle1  38022  lhpexle2  38024  lhpexle3  38026