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 50202

Description: Lemma for elpg 50204. (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 6840	. . . . 5 ⊢ (1^st ‘𝐴) ∈ V
2		fvex 6840	. . . . 5 ⊢ (2^nd ‘𝐴) ∈ V
3	1, 2	unex 7687	. . . 4 ⊢ ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) ∈ V
4	3	isseti 3449	. . 3 ⊢ ∃𝑥 𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴))
5		sseq1 3940	. . . . . 6 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (𝑥 ⊆ Pg ↔ ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) ⊆ Pg))
6		unss 4119	. . . . . 6 ⊢ (((1^st ‘𝐴) ⊆ Pg ∧ (2^nd ‘𝐴) ⊆ Pg) ↔ ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) ⊆ Pg)
7	5, 6	bitr4di 290	. . . . 5 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (𝑥 ⊆ Pg ↔ ((1^st ‘𝐴) ⊆ Pg ∧ (2^nd ‘𝐴) ⊆ Pg)))
8	7	biimprd 249	. . . 4 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (((1^st ‘𝐴) ⊆ Pg ∧ (2^nd ‘𝐴) ⊆ Pg) → 𝑥 ⊆ Pg))
9		ssun1 4107	. . . . . . 7 ⊢ (1^st ‘𝐴) ⊆ ((1^st ‘𝐴) ∪ (2^nd ‘𝐴))
10		id 22	. . . . . . 7 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → 𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)))
11	9, 10	sseqtrrid 3958	. . . . . 6 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (1^st ‘𝐴) ⊆ 𝑥)
12		vex 3435	. . . . . . 7 ⊢ 𝑥 ∈ V
13	12	elpw2 5262	. . . . . 6 ⊢ ((1^st ‘𝐴) ∈ 𝒫 𝑥 ↔ (1^st ‘𝐴) ⊆ 𝑥)
14	11, 13	sylibr 235	. . . . 5 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (1^st ‘𝐴) ∈ 𝒫 𝑥)
15		ssun2 4108	. . . . . . 7 ⊢ (2^nd ‘𝐴) ⊆ ((1^st ‘𝐴) ∪ (2^nd ‘𝐴))
16	15, 10	sseqtrrid 3958	. . . . . 6 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (2^nd ‘𝐴) ⊆ 𝑥)
17	12	elpw2 5262	. . . . . 6 ⊢ ((2^nd ‘𝐴) ∈ 𝒫 𝑥 ↔ (2^nd ‘𝐴) ⊆ 𝑥)
18	16, 17	sylibr 235	. . . . 5 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (2^nd ‘𝐴) ∈ 𝒫 𝑥)
19	14, 18	jca 516	. . . 4 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → ((1^st ‘𝐴) ∈ 𝒫 𝑥 ∧ (2^nd ‘𝐴) ∈ 𝒫 𝑥))
20	8, 19	jctird 531	. . 3 ⊢ (𝑥 = ((1^st ‘𝐴) ∪ (2^nd ‘𝐴)) → (((1^st ‘𝐴) ⊆ Pg ∧ (2^nd ‘𝐴) ⊆ Pg) → (𝑥 ⊆ Pg ∧ ((1^st ‘𝐴) ∈ 𝒫 𝑥 ∧ (2^nd ‘𝐴) ∈ 𝒫 𝑥))))
21	4, 20	eximii 1844	. 2 ⊢ ∃𝑥(((1^st ‘𝐴) ⊆ Pg ∧ (2^nd ‘𝐴) ⊆ Pg) → (𝑥 ⊆ Pg ∧ ((1^st ‘𝐴) ∈ 𝒫 𝑥 ∧ (2^nd ‘𝐴) ∈ 𝒫 𝑥)))
22	21	19.37iv 1955	1 ⊢ (((1^st ‘𝐴) ⊆ Pg ∧ (2^nd ‘𝐴) ⊆ Pg) → ∃𝑥(𝑥 ⊆ Pg ∧ ((1^st ‘𝐴) ∈ 𝒫 𝑥 ∧ (2^nd ‘𝐴) ∈ 𝒫 𝑥)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 396 = wceq 1547 ∃wex 1786 ∈ wcel 2119 ∪ cun 3881 ⊆ wss 3883 𝒫 cpw 4529 ‘cfv 6485 1^st c1st 7929 2^nd c2nd 7930 Pgcpg 50199

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1802 ax-4 1816 ax-5 1917 ax-6 1974 ax-7 2015 ax-8 2121 ax-9 2129 ax-ext 2711 ax-sep 5218 ax-nul 5228 ax-pr 5362 ax-un 7678

This theorem depends on definitions: df-bi 208 df-an 397 df-or 854 df-3an 1094 df-tru 1550 df-fal 1560 df-ex 1787 df-sb 2074 df-clab 2718 df-cleq 2731 df-clel 2814 df-ne 2935 df-rab 3392 df-v 3433 df-dif 3886 df-un 3888 df-in 3890 df-ss 3900 df-nul 4262 df-pw 4531 df-sn 4556 df-pr 4558 df-uni 4839 df-iota 6441 df-fv 6493

This theorem is referenced by: elpg 50204

W3C validator