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 49231

Description: Lemma for elpg 49233. (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 6919	. . . . 5 ⊢ (1^st ‘𝐴) ∈ V
2		fvex 6919	. . . . 5 ⊢ (2^nd ‘𝐴) ∈ V
3	1, 2	unex 7764	. . . 4 ⊢ ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) ∈ V
4	3	isseti 3498	. . 3 ⊢ ∃𝑥 𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴))
5		sseq1 4009	. . . . . 6 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (𝑥 ⊆ Pg ↔ ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) ⊆ Pg))
6		unss 4190	. . . . . 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 4178	. . . . . . 7 ⊢ (1^st ‘𝐴) ⊆ ((1^st ‘𝐴) ∪ (2^nd ‘𝐴))
10		id 22	. . . . . . 7 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → 𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)))
11	9, 10	sseqtrrid 4027	. . . . . 6 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (1^st ‘𝐴) ⊆ 𝑥)
12		vex 3484	. . . . . . 7 ⊢ 𝑥 ∈ V
13	12	elpw2 5334	. . . . . 6 ⊢ ((1^st ‘𝐴) ∈ 𝒫 𝑥 ↔ (1^st ‘𝐴) ⊆ 𝑥)
14	11, 13	sylibr 234	. . . . 5 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (1^st ‘𝐴) ∈ 𝒫 𝑥)
15		ssun2 4179	. . . . . . 7 ⊢ (2^nd ‘𝐴) ⊆ ((1^st ‘𝐴) ∪ (2^nd ‘𝐴))
16	15, 10	sseqtrrid 4027	. . . . . 6 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (2^nd ‘𝐴) ⊆ 𝑥)
17	12	elpw2 5334	. . . . . 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 1837	. 2 ⊢ ∃𝑥(((1^st ‘𝐴) ⊆ Pg ∧ (2^nd ‘𝐴) ⊆ Pg) → (𝑥 ⊆ Pg ∧ ((1^st ‘𝐴) ∈ 𝒫 𝑥 ∧ (2^nd ‘𝐴) ∈ 𝒫 𝑥)))
22	21	19.37iv 1948	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 1540 ∃wex 1779 ∈ wcel 2108 ∪ cun 3949 ⊆ wss 3951 𝒫 cpw 4600 ‘cfv 6561 1^st c1st 8012 2^nd c2nd 8013 Pgcpg 49228

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2007 ax-8 2110 ax-9 2118 ax-ext 2708 ax-sep 5296 ax-nul 5306 ax-pr 5432 ax-un 7755

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3an 1089 df-tru 1543 df-fal 1553 df-ex 1780 df-sb 2065 df-clab 2715 df-cleq 2729 df-clel 2816 df-ne 2941 df-rab 3437 df-v 3482 df-dif 3954 df-un 3956 df-in 3958 df-ss 3968 df-nul 4334 df-pw 4602 df-sn 4627 df-pr 4629 df-uni 4908 df-iota 6514 df-fv 6569

This theorem is referenced by: elpg 49233

W3C validator