Theorem pgindnf 51215

Description: Version of pgind 51216 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 51209	. 2 ⊢ Pg = setrecs((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎)))
2		pgindnf.4	. 2 ⊢ (𝑦 = 𝐴 → (𝜒 ↔ 𝜃))
3		pgindnf.1	. . . . . . 7 ⊢ Ⅎ𝑥𝜑
4		nfv 1949	. . . . . . 7 ⊢ Ⅎ𝑥∀𝑦 ∈ 𝑧 𝜒
5	3, 4	nfan 1934	. . . . . 6 ⊢ Ⅎ𝑥(𝜑 ∧ ∀𝑦 ∈ 𝑧 𝜒)
6		pgindlem 51214	. . . . . . . . . . 11 ⊢ (𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧) → ((1st ‘𝑥) ∪ (2nd ‘𝑥)) ⊆ 𝑧)
7	6	sseld 3912	. . . . . . . . . 10 ⊢ (𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧) → (𝑦 ∈ ((1st ‘𝑥) ∪ (2nd ‘𝑥)) → 𝑦 ∈ 𝑧))
8	7	imim1d 83	. . . . . . . . 9 ⊢ (𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧) → ((𝑦 ∈ 𝑧 → 𝜒) → (𝑦 ∈ ((1st ‘𝑥) ∪ (2nd ‘𝑥)) → 𝜒)))
9	8	ralimdv2 3175	. . . . . . . 8 ⊢ (𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧) → (∀𝑦 ∈ 𝑧 𝜒 → ∀𝑦 ∈ ((1st ‘𝑥) ∪ (2nd ‘𝑥))𝜒))
10		pgindnf.5	. . . . . . . . 9 ⊢ (𝜑 → ∀𝑥(∀𝑦 ∈ ((1st ‘𝑥) ∪ (2nd ‘𝑥))𝜒 → 𝜓))
11	10	19.21bi 2229	. . . . . . . 8 ⊢ (𝜑 → (∀𝑦 ∈ ((1st ‘𝑥) ∪ (2nd ‘𝑥))𝜒 → 𝜓))
12	9, 11	sylan9r 518	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧)) → (∀𝑦 ∈ 𝑧 𝜒 → 𝜓))
13	12	impancom 457	. . . . . 6 ⊢ ((𝜑 ∧ ∀𝑦 ∈ 𝑧 𝜒) → (𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧) → 𝜓))
14	5, 13	ralrimi 3264	. . . . 5 ⊢ ((𝜑 ∧ ∀𝑦 ∈ 𝑧 𝜒) → ∀𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧)𝜓)
15		pgindnf.3	. . . . . 6 ⊢ (𝑥 = 𝑦 → (𝜓 ↔ 𝜒))
16		vex 3458	. . . . . . . . 9 ⊢ 𝑧 ∈ V
17		pweq 4574	. . . . . . . . . . 11 ⊢ (𝑎 = 𝑧 → 𝒫 𝑎 = 𝒫 𝑧)
18	17	sqxpeqd 5690	. . . . . . . . . 10 ⊢ (𝑎 = 𝑧 → (𝒫 𝑎 × 𝒫 𝑎) = (𝒫 𝑧 × 𝒫 𝑧))
19		eqid 2763	. . . . . . . . . 10 ⊢ (𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎)) = (𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))
20		vpwex 5346	. . . . . . . . . . 11 ⊢ 𝒫 𝑧 ∈ V
21	20, 20	xpex 7799	. . . . . . . . . 10 ⊢ (𝒫 𝑧 × 𝒫 𝑧) ∈ V
22	18, 19, 21	fvmpt 7024	. . . . . . . . 9 ⊢ (𝑧 ∈ V → ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧) = (𝒫 𝑧 × 𝒫 𝑧))
23	16, 22	ax-mp 5	. . . . . . . 8 ⊢ ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧) = (𝒫 𝑧 × 𝒫 𝑧)
24	23	eqcomi 2772	. . . . . . 7 ⊢ (𝒫 𝑧 × 𝒫 𝑧) = ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧)
25	24	a1i 11	. . . . . 6 ⊢ (𝑥 = 𝑦 → (𝒫 𝑧 × 𝒫 𝑧) = ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧))
26	15, 25	cbvralv2 3897	. . . . 5 ⊢ (∀𝑥 ∈ (𝒫 𝑧 × 𝒫 𝑧)𝜓 ↔ ∀𝑦 ∈ ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧)𝜒)
27	14, 26	sylib 221	. . . 4 ⊢ ((𝜑 ∧ ∀𝑦 ∈ 𝑧 𝜒) → ∀𝑦 ∈ ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧)𝜒)
28	27	ex 418	. . 3 ⊢ (𝜑 → (∀𝑦 ∈ 𝑧 𝜒 → ∀𝑦 ∈ ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧)𝜒))
29	28	alrimiv 1962	. 2 ⊢ (𝜑 → ∀𝑧(∀𝑦 ∈ 𝑧 𝜒 → ∀𝑦 ∈ ((𝑎 ∈ V ↦ (𝒫 𝑎 × 𝒫 𝑎))‘𝑧)𝜒))
30	1, 2, 29	setis 51197	1 ⊢ (𝜑 → (𝐴 ∈ Pg → 𝜃))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401  ∀wal 1568   = wceq 1570  Ⅎwnf 1816   ∈ wcel 2147  ∀wral 3080  Vcvv 3454   ∪ cun 4152  𝒫 cpw 4560   ↦ cmpt 5192   × cxp 5656  ‘cfv 6566  1^st c1st 8033  2^nd c2nd 8034  Pgcpg 51208

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-13 2404  ax-ext 2735  ax-rep 5238  ax-sep 5255  ax-nul 5266  ax-pow 5334  ax-pr 5398  ax-un 7783

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-ral 3081  df-rex 3091  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4841  df-uni 4873  df-br 5109  df-opab 5174  df-mpt 5193  df-id 5553  df-xp 5664  df-rel 5665  df-cnv 5666  df-co 5667  df-dm 5668  df-rn 5669  df-res 5670  df-ima 5671  df-iota 6520  df-fun 6568  df-fv 6574  df-1st 8035  df-2nd 8036  df-setrecs 10002  df-pg 51209

This theorem is used by:  pgind  51216