Theorem pgindnf 49748

Description: Version of pgind 49749 with extraneous not-free requirements. (Contributed by Emmett Weisz, 27-May-2024.) (New usage is discouraged.)

Hypotheses

Ref	Expression
pgindnf.1	⊢ Ⅎ𝑥𝜑
pgindnf.2	⊢ Ⅎ𝑦𝜑
pgindnf.3	⊢ (𝑥 = 𝑦 → (𝜓 ↔ 𝜒))
pgindnf.4	⊢ (𝑦 = 𝐴 → (𝜒 ↔ 𝜃))
pgindnf.5	⊢ (𝜑 → ∀𝑥(∀𝑦 ∈ ((1st ‘𝑥) ∪ (2nd ‘𝑥))𝜒 → 𝜓))

Assertion

Ref	Expression
pgindnf	⊢ (𝜑 → (𝐴 ∈ Pg → 𝜃))

Distinct variable groups:   𝑦,𝐴   𝑥,𝑦   𝜒,𝑥   𝜓,𝑦   𝜃,𝑦

Allowed substitution hints:   𝜑(𝑥,𝑦)   𝜓(𝑥)   𝜒(𝑦)   𝜃(𝑥)   𝐴(𝑥)

Proof of Theorem pgindnf

Dummy variables 𝑎 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-pg 49742	. 2 ⊢ Pg = setrecs((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎)))
2		pgindnf.4	. 2 ⊢ (𝑦 = 𝐴 → (𝜒 ↔ 𝜃))
3		pgindnf.1	. . . . . . 7 ⊢ Ⅎ𝑥𝜑
4		nfv 1915	. . . . . . 7 ⊢ Ⅎ𝑥∀𝑦 ∈ 𝑧 𝜒
5	3, 4	nfan 1900	. . . . . 6 ⊢ Ⅎ𝑥(𝜑 ∧ ∀𝑦 ∈ 𝑧 𝜒)
6		pgindlem 49747	. . . . . . . . . . 11 ⊢ (𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧) → ((1st ‘𝑥) ∪ (2nd ‘𝑥)) ⊆ 𝑧)
7	6	sseld 3928	. . . . . . . . . 10 ⊢ (𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧) → (𝑦 ∈ ((1st ‘𝑥) ∪ (2nd ‘𝑥)) → 𝑦 ∈ 𝑧))
8	7	imim1d 82	. . . . . . . . 9 ⊢ (𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧) → ((𝑦 ∈ 𝑧 → 𝜒) → (𝑦 ∈ ((1st ‘𝑥) ∪ (2nd ‘𝑥)) → 𝜒)))
9	8	ralimdv2 3141	. . . . . . . 8 ⊢ (𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧) → (∀𝑦 ∈ 𝑧 𝜒 → ∀𝑦 ∈ ((1st ‘𝑥) ∪ (2nd ‘𝑥))𝜒))
10		pgindnf.5	. . . . . . . . 9 ⊢ (𝜑 → ∀𝑥(∀𝑦 ∈ ((1st ‘𝑥) ∪ (2nd ‘𝑥))𝜒 → 𝜓))
11	10	19.21bi 2192	. . . . . . . 8 ⊢ (𝜑 → (∀𝑦 ∈ ((1st ‘𝑥) ∪ (2nd ‘𝑥))𝜒 → 𝜓))
12	9, 11	sylan9r 508	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧)) → (∀𝑦 ∈ 𝑧 𝜒 → 𝜓))
13	12	impancom 451	. . . . . 6 ⊢ ((𝜑 ∧ ∀𝑦 ∈ 𝑧 𝜒) → (𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧) → 𝜓))
14	5, 13	ralrimi 3230	. . . . 5 ⊢ ((𝜑 ∧ ∀𝑦 ∈ 𝑧 𝜒) → ∀𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧)𝜓)
15		pgindnf.3	. . . . . 6 ⊢ (𝑥 = 𝑦 → (𝜓 ↔ 𝜒))
16		vex 3440	. . . . . . . . 9 ⊢ 𝑧 ∈ V
17		pweq 4559	. . . . . . . . . . 11 ⊢ (𝑎 = 𝑧 → 𝒫 𝑎 = 𝒫 𝑧)
18	17	sqxpeqd 5643	. . . . . . . . . 10 ⊢ (𝑎 = 𝑧 → (𝒫 𝑎 × 𝒫 𝑎) = (𝒫 𝑧 × 𝒫 𝑧))
19		eqid 2731	. . . . . . . . . 10 ⊢ (𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎)) = (𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))
20		vpwex 5310	. . . . . . . . . . 11 ⊢ 𝒫 𝑧 ∈ V
21	20, 20	xpex 7681	. . . . . . . . . 10 ⊢ (𝒫 𝑧 × 𝒫 𝑧) ∈ V
22	18, 19, 21	fvmpt 6924	. . . . . . . . 9 ⊢ (𝑧 ∈ V → ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧) = (𝒫 𝑧 × 𝒫 𝑧))
23	16, 22	ax-mp 5	. . . . . . . 8 ⊢ ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧) = (𝒫 𝑧 × 𝒫 𝑧)
24	23	eqcomi 2740	. . . . . . 7 ⊢ (𝒫 𝑧 × 𝒫 𝑧) = ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧)
25	24	a1i 11	. . . . . 6 ⊢ (𝑥 = 𝑦 → (𝒫 𝑧 × 𝒫 𝑧) = ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧))
26	15, 25	cbvralv2 3891	. . . . 5 ⊢ (∀𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧)𝜓 ↔ ∀𝑦 ∈ ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧)𝜒)
27	14, 26	sylib 218	. . . 4 ⊢ ((𝜑 ∧ ∀𝑦 ∈ 𝑧 𝜒) → ∀𝑦 ∈ ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧)𝜒)
28	27	ex 412	. . 3 ⊢ (𝜑 → (∀𝑦 ∈ 𝑧 𝜒 → ∀𝑦 ∈ ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧)𝜒))
29	28	alrimiv 1928	. 2 ⊢ (𝜑 → ∀𝑧(∀𝑦 ∈ 𝑧 𝜒 → ∀𝑦 ∈ ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧)𝜒))
30	1, 2, 29	setis 49730	1 ⊢ (𝜑 → (𝐴 ∈ Pg → 𝜃))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395  ∀wal 1539   = wceq 1541  Ⅎwnf 1784   ∈ wcel 2111  ∀wral 3047  Vcvv 3436   ∪ cun 3895  𝒫 cpw 4545   ↦ cmpt 5167   × cxp 5609  ‘cfv 6476  1^st c1st 7914  2^nd c2nd 7915  Pgcpg 49741

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-10 2144  ax-11 2160  ax-12 2180  ax-13 2372  ax-ext 2703  ax-rep 5212  ax-sep 5229  ax-nul 5239  ax-pow 5298  ax-pr 5365  ax-un 7663

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-nf 1785  df-sb 2068  df-mo 2535  df-eu 2564  df-clab 2710  df-cleq 2723  df-clel 2806  df-nfc 2881  df-ne 2929  df-ral 3048  df-rex 3057  df-rab 3396  df-v 3438  df-sbc 3737  df-csb 3846  df-dif 3900  df-un 3902  df-in 3904  df-ss 3914  df-nul 4279  df-if 4471  df-pw 4547  df-sn 4572  df-pr 4574  df-op 4578  df-uni 4855  df-br 5087  df-opab 5149  df-mpt 5168  df-id 5506  df-xp 5617  df-rel 5618  df-cnv 5619  df-co 5620  df-dm 5621  df-rn 5622  df-res 5623  df-ima 5624  df-iota 6432  df-fun 6478  df-fv 6484  df-1st 7916  df-2nd 7917  df-setrecs 49716  df-pg 49742

This theorem is referenced by:  pgind  49749