Theorem fpwwelem 10061

Description: Lemma for fpwwe 10062. (Contributed by Mario Carneiro, 15-May-2015.)

Hypotheses

Ref	Expression
fpwwe.1	⊢ 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦 ∈ 𝑥 (𝐹‘(◡𝑟 “ {𝑦})) = 𝑦))}
fpwwe.2	⊢ (𝜑 → 𝐴 ∈ V)

Assertion

Ref	Expression
fpwwelem	⊢ (𝜑 → (𝑋𝑊𝑅 ↔ ((𝑋 ⊆ 𝐴 ∧ 𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦 ∈ 𝑋 (𝐹‘(◡𝑅 “ {𝑦})) = 𝑦))))

Distinct variable groups:   𝑥,𝑟,𝐴   𝑦,𝑟,𝐹,𝑥   𝜑,𝑟,𝑥,𝑦   𝑅,𝑟,𝑥,𝑦   𝑋,𝑟,𝑥,𝑦   𝑊,𝑟,𝑥,𝑦

Allowed substitution hint:   𝐴(𝑦)

Proof of Theorem fpwwelem

Step	Hyp	Ref	Expression
1		fpwwe.1	. . . . 5 ⊢ 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦 ∈ 𝑥 (𝐹‘(◡𝑟 “ {𝑦})) = 𝑦))}
2	1	relopabi 5688	. . . 4 ⊢ Rel 𝑊
3	2	a1i 11	. . 3 ⊢ (𝜑 → Rel 𝑊)
4		brrelex12 5598	. . 3 ⊢ ((Rel 𝑊 ∧ 𝑋𝑊𝑅) → (𝑋 ∈ V ∧ 𝑅 ∈ V))
5	3, 4	sylan 582	. 2 ⊢ ((𝜑 ∧ 𝑋𝑊𝑅) → (𝑋 ∈ V ∧ 𝑅 ∈ V))
6		fpwwe.2	. . . . 5 ⊢ (𝜑 → 𝐴 ∈ V)
7	6	adantr 483	. . . 4 ⊢ ((𝜑 ∧ ((𝑋 ⊆ 𝐴 ∧ 𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦 ∈ 𝑋 (𝐹‘(◡𝑅 “ {𝑦})) = 𝑦))) → 𝐴 ∈ V)
8		simprll 777	. . . 4 ⊢ ((𝜑 ∧ ((𝑋 ⊆ 𝐴 ∧ 𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦 ∈ 𝑋 (𝐹‘(◡𝑅 “ {𝑦})) = 𝑦))) → 𝑋 ⊆ 𝐴)
9	7, 8	ssexd 5220	. . 3 ⊢ ((𝜑 ∧ ((𝑋 ⊆ 𝐴 ∧ 𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦 ∈ 𝑋 (𝐹‘(◡𝑅 “ {𝑦})) = 𝑦))) → 𝑋 ∈ V)
10	9, 9	xpexd 7468	. . . 4 ⊢ ((𝜑 ∧ ((𝑋 ⊆ 𝐴 ∧ 𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦 ∈ 𝑋 (𝐹‘(◡𝑅 “ {𝑦})) = 𝑦))) → (𝑋 × 𝑋) ∈ V)
11		simprlr 778	. . . 4 ⊢ ((𝜑 ∧ ((𝑋 ⊆ 𝐴 ∧ 𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦 ∈ 𝑋 (𝐹‘(◡𝑅 “ {𝑦})) = 𝑦))) → 𝑅 ⊆ (𝑋 × 𝑋))
12	10, 11	ssexd 5220	. . 3 ⊢ ((𝜑 ∧ ((𝑋 ⊆ 𝐴 ∧ 𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦 ∈ 𝑋 (𝐹‘(◡𝑅 “ {𝑦})) = 𝑦))) → 𝑅 ∈ V)
13	9, 12	jca 514	. 2 ⊢ ((𝜑 ∧ ((𝑋 ⊆ 𝐴 ∧ 𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦 ∈ 𝑋 (𝐹‘(◡𝑅 “ {𝑦})) = 𝑦))) → (𝑋 ∈ V ∧ 𝑅 ∈ V))
14		simpl 485	. . . . . 6 ⊢ ((𝑥 = 𝑋 ∧ 𝑟 = 𝑅) → 𝑥 = 𝑋)
15	14	sseq1d 3997	. . . . 5 ⊢ ((𝑥 = 𝑋 ∧ 𝑟 = 𝑅) → (𝑥 ⊆ 𝐴 ↔ 𝑋 ⊆ 𝐴))
16		simpr 487	. . . . . 6 ⊢ ((𝑥 = 𝑋 ∧ 𝑟 = 𝑅) → 𝑟 = 𝑅)
17	14	sqxpeqd 5581	. . . . . 6 ⊢ ((𝑥 = 𝑋 ∧ 𝑟 = 𝑅) → (𝑥 × 𝑥) = (𝑋 × 𝑋))
18	16, 17	sseq12d 3999	. . . . 5 ⊢ ((𝑥 = 𝑋 ∧ 𝑟 = 𝑅) → (𝑟 ⊆ (𝑥 × 𝑥) ↔ 𝑅 ⊆ (𝑋 × 𝑋)))
19	15, 18	anbi12d 632	. . . 4 ⊢ ((𝑥 = 𝑋 ∧ 𝑟 = 𝑅) → ((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥)) ↔ (𝑋 ⊆ 𝐴 ∧ 𝑅 ⊆ (𝑋 × 𝑋))))
20		weeq2 5538	. . . . . 6 ⊢ (𝑥 = 𝑋 → (𝑟 We 𝑥 ↔ 𝑟 We 𝑋))
21		weeq1 5537	. . . . . 6 ⊢ (𝑟 = 𝑅 → (𝑟 We 𝑋 ↔ 𝑅 We 𝑋))
22	20, 21	sylan9bb 512	. . . . 5 ⊢ ((𝑥 = 𝑋 ∧ 𝑟 = 𝑅) → (𝑟 We 𝑥 ↔ 𝑅 We 𝑋))
23	16	cnveqd 5740	. . . . . . . 8 ⊢ ((𝑥 = 𝑋 ∧ 𝑟 = 𝑅) → ◡𝑟 = ◡𝑅)
24	23	imaeq1d 5922	. . . . . . 7 ⊢ ((𝑥 = 𝑋 ∧ 𝑟 = 𝑅) → (◡𝑟 “ {𝑦}) = (◡𝑅 “ {𝑦}))
25	24	fveqeq2d 6672	. . . . . 6 ⊢ ((𝑥 = 𝑋 ∧ 𝑟 = 𝑅) → ((𝐹‘(◡𝑟 “ {𝑦})) = 𝑦 ↔ (𝐹‘(◡𝑅 “ {𝑦})) = 𝑦))
26	14, 25	raleqbidv 3401	. . . . 5 ⊢ ((𝑥 = 𝑋 ∧ 𝑟 = 𝑅) → (∀𝑦 ∈ 𝑥 (𝐹‘(◡𝑟 “ {𝑦})) = 𝑦 ↔ ∀𝑦 ∈ 𝑋 (𝐹‘(◡𝑅 “ {𝑦})) = 𝑦))
27	22, 26	anbi12d 632	. . . 4 ⊢ ((𝑥 = 𝑋 ∧ 𝑟 = 𝑅) → ((𝑟 We 𝑥 ∧ ∀𝑦 ∈ 𝑥 (𝐹‘(◡𝑟 “ {𝑦})) = 𝑦) ↔ (𝑅 We 𝑋 ∧ ∀𝑦 ∈ 𝑋 (𝐹‘(◡𝑅 “ {𝑦})) = 𝑦)))
28	19, 27	anbi12d 632	. . 3 ⊢ ((𝑥 = 𝑋 ∧ 𝑟 = 𝑅) → (((𝑥 ⊆ 𝐴 ∧ 𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦 ∈ 𝑥 (𝐹‘(◡𝑟 “ {𝑦})) = 𝑦)) ↔ ((𝑋 ⊆ 𝐴 ∧ 𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦 ∈ 𝑋 (𝐹‘(◡𝑅 “ {𝑦})) = 𝑦))))
29	28, 1	brabga 5413	. 2 ⊢ ((𝑋 ∈ V ∧ 𝑅 ∈ V) → (𝑋𝑊𝑅 ↔ ((𝑋 ⊆ 𝐴 ∧ 𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦 ∈ 𝑋 (𝐹‘(◡𝑅 “ {𝑦})) = 𝑦))))
30	5, 13, 29	pm5.21nd 800	1 ⊢ (𝜑 → (𝑋𝑊𝑅 ↔ ((𝑋 ⊆ 𝐴 ∧ 𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦 ∈ 𝑋 (𝐹‘(◡𝑅 “ {𝑦})) = 𝑦))))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 398   = wceq 1533   ∈ wcel 2110  ∀wral 3138  Vcvv 3494   ⊆ wss 3935  {csn 4560   class class class wbr 5058  {copab 5120   We wwe 5507   × cxp 5547  ^◡ccnv 5548   “ cima 5552  Rel wrel 5554  ‘cfv 6349

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-sep 5195  ax-nul 5202  ax-pow 5258  ax-pr 5321  ax-un 7455

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1536  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ral 3143  df-rex 3144  df-rab 3147  df-v 3496  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-nul 4291  df-if 4467  df-pw 4540  df-sn 4561  df-pr 4563  df-op 4567  df-uni 4832  df-br 5059  df-opab 5121  df-po 5468  df-so 5469  df-fr 5508  df-we 5510  df-xp 5555  df-rel 5556  df-cnv 5557  df-dm 5559  df-rn 5560  df-res 5561  df-ima 5562  df-iota 6308  df-fv 6357

This theorem is referenced by:  canth4  10063  canthnumlem  10064  canthp1lem2  10069