elpglem2 - Mathbox for Emmett Weisz

	Mathbox for Emmett Weisz		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > elpglem2		Structured version Visualization version GIF version

Theorem elpglem2 49750

Description: Lemma for elpg 49752. (Contributed by Emmett Weisz, 28-Aug-2021.)

**Assertion**
Ref	Expression
elpglem2	⊢ (((1^st ‘𝐴) ⊆ Pg ∧ (2^nd ‘𝐴) ⊆ Pg) → ∃𝑥(𝑥 ⊆ Pg ∧ ((1^st ‘𝐴) ∈ 𝒫 𝑥 ∧ (2^nd ‘𝐴) ∈ 𝒫 𝑥)))

Distinct variable group: 𝑥,𝐴

**Proof of Theorem elpglem2**
Step	Hyp	Ref	Expression
1		fvex 6835	. . . . 5 ⊢ (1^st ‘𝐴) ∈ V
2		fvex 6835	. . . . 5 ⊢ (2^nd ‘𝐴) ∈ V
3	1, 2	unex 7677	. . . 4 ⊢ ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) ∈ V
4	3	isseti 3454	. . 3 ⊢ ∃𝑥 𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴))
5		sseq1 3960	. . . . . 6 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (𝑥 ⊆ Pg ↔ ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) ⊆ Pg))
6		unss 4140	. . . . . 6 ⊢ (((1^st ‘𝐴) ⊆ Pg ∧ (2^nd ‘𝐴) ⊆ Pg) ↔ ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) ⊆ Pg)
7	5, 6	bitr4di 289	. . . . 5 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (𝑥 ⊆ Pg ↔ ((1^st ‘𝐴) ⊆ Pg ∧ (2^nd ‘𝐴) ⊆ Pg)))
8	7	biimprd 248	. . . 4 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (((1^st ‘𝐴) ⊆ Pg ∧ (2^nd ‘𝐴) ⊆ Pg) → 𝑥 ⊆ Pg))
9		ssun1 4128	. . . . . . 7 ⊢ (1^st ‘𝐴) ⊆ ((1^st ‘𝐴) ∪ (2^nd ‘𝐴))
10		id 22	. . . . . . 7 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → 𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)))
11	9, 10	sseqtrrid 3978	. . . . . 6 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (1^st ‘𝐴) ⊆ 𝑥)
12		vex 3440	. . . . . . 7 ⊢ 𝑥 ∈ V
13	12	elpw2 5272	. . . . . 6 ⊢ ((1^st ‘𝐴) ∈ 𝒫 𝑥 ↔ (1^st ‘𝐴) ⊆ 𝑥)
14	11, 13	sylibr 234	. . . . 5 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (1^st ‘𝐴) ∈ 𝒫 𝑥)
15		ssun2 4129	. . . . . . 7 ⊢ (2^nd ‘𝐴) ⊆ ((1^st ‘𝐴) ∪ (2^nd ‘𝐴))
16	15, 10	sseqtrrid 3978	. . . . . 6 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (2^nd ‘𝐴) ⊆ 𝑥)
17	12	elpw2 5272	. . . . . 6 ⊢ ((2^nd ‘𝐴) ∈ 𝒫 𝑥 ↔ (2^nd ‘𝐴) ⊆ 𝑥)
18	16, 17	sylibr 234	. . . . 5 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (2^nd ‘𝐴) ∈ 𝒫 𝑥)
19	14, 18	jca 511	. . . 4 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → ((1^st ‘𝐴) ∈ 𝒫 𝑥 ∧ (2^nd ‘𝐴) ∈ 𝒫 𝑥))
20	8, 19	jctird 526	. . 3 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (((1^st ‘𝐴) ⊆ Pg ∧ (2^nd ‘𝐴) ⊆ Pg) → (𝑥 ⊆ Pg ∧ ((1^st ‘𝐴) ∈ 𝒫 𝑥 ∧ (2^nd ‘𝐴) ∈ 𝒫 𝑥))))
21	4, 20	eximii 1838	. 2 ⊢ ∃𝑥(((1^st ‘𝐴) ⊆ Pg ∧ (2^nd ‘𝐴) ⊆ Pg) → (𝑥 ⊆ Pg ∧ ((1^st ‘𝐴) ∈ 𝒫 𝑥 ∧ (2^nd ‘𝐴) ∈ 𝒫 𝑥)))
22	21	19.37iv 1949	1 ⊢ (((1^st ‘𝐴) ⊆ Pg ∧ (2^nd ‘𝐴) ⊆ Pg) → ∃𝑥(𝑥 ⊆ Pg ∧ ((1^st ‘𝐴) ∈ 𝒫 𝑥 ∧ (2^nd ‘𝐴) ∈ 𝒫 𝑥)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1541 ∃wex 1780 ∈ wcel 2111 ∪ cun 3900 ⊆ wss 3902 𝒫 cpw 4550 ‘cfv 6481 1^st c1st 7919 2^nd c2nd 7920 Pgcpg 49747

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1968 ax-7 2009 ax-8 2113 ax-9 2121 ax-ext 2703 ax-sep 5234 ax-nul 5244 ax-pr 5370 ax-un 7668

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3an 1088 df-tru 1544 df-fal 1554 df-ex 1781 df-sb 2068 df-clab 2710 df-cleq 2723 df-clel 2806 df-ne 2929 df-rab 3396 df-v 3438 df-dif 3905 df-un 3907 df-in 3909 df-ss 3919 df-nul 4284 df-pw 4552 df-sn 4577 df-pr 4579 df-uni 4860 df-iota 6437 df-fv 6489

This theorem is referenced by: elpg 49752

W3C validator