Theorem sprsymrelfvlem 48390

Description: Lemma for sprsymrelf 48395 and sprsymrelfv 48394. (Contributed by AV, 19-Nov-2021.)

Assertion

Ref	Expression
sprsymrelfvlem	⊢ (𝑃 ⊆ (Pairs‘𝑉) → {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} ∈ 𝒫 (𝑉 × 𝑉))

Distinct variable groups:   𝑃,𝑐,𝑥,𝑦   𝑉,𝑐,𝑥,𝑦

Proof of Theorem sprsymrelfvlem

Dummy variable 𝑝 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		simpl 488	. . . . 5 ⊢ ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → 𝑉 ∈ V)
2		eleq1 2848	. . . . . . . . . . . 12 ⊢ (𝑐 = {𝑥, 𝑦} → (𝑐 ∈ 𝑃 ↔ {𝑥, 𝑦} ∈ 𝑃))
3		prsssprel 48388	. . . . . . . . . . . . . . 15 ⊢ ((𝑃 ⊆ (Pairs‘𝑉) ∧ {𝑥, 𝑦} ∈ 𝑃 ∧ (𝑥 ∈ V ∧ 𝑦 ∈ V)) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉))
4	3	3exp 1137	. . . . . . . . . . . . . 14 ⊢ (𝑃 ⊆ (Pairs‘𝑉) → ({𝑥, 𝑦} ∈ 𝑃 → ((𝑥 ∈ V ∧ 𝑦 ∈ V) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉))))
5	4	com13 89	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ V ∧ 𝑦 ∈ V) → ({𝑥, 𝑦} ∈ 𝑃 → (𝑃 ⊆ (Pairs‘𝑉) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉))))
6	5	el2v 3457	. . . . . . . . . . . 12 ⊢ ({𝑥, 𝑦} ∈ 𝑃 → (𝑃 ⊆ (Pairs‘𝑉) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)))
7	2, 6	biimtrdi 256	. . . . . . . . . . 11 ⊢ (𝑐 = {𝑥, 𝑦} → (𝑐 ∈ 𝑃 → (𝑃 ⊆ (Pairs‘𝑉) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉))))
8	7	com12 33	. . . . . . . . . 10 ⊢ (𝑐 ∈ 𝑃 → (𝑐 = {𝑥, 𝑦} → (𝑃 ⊆ (Pairs‘𝑉) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉))))
9	8	rexlimiv 3156	. . . . . . . . 9 ⊢ (∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦} → (𝑃 ⊆ (Pairs‘𝑉) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)))
10	9	com12 33	. . . . . . . 8 ⊢ (𝑃 ⊆ (Pairs‘𝑉) → (∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦} → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)))
11	10	adantl 487	. . . . . . 7 ⊢ ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → (∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦} → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)))
12	11	imp 412	. . . . . 6 ⊢ (((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉))
13	12	simpld 500	. . . . 5 ⊢ (((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) → 𝑥 ∈ 𝑉)
14	12	simprd 501	. . . . 5 ⊢ (((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) → 𝑦 ∈ 𝑉)
15	1, 1, 13, 14	opabex2 8054	. . . 4 ⊢ ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} ∈ V)
16		elopab 5505	. . . . . . 7 ⊢ (𝑝 ∈ {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} ↔ ∃𝑥∃𝑦(𝑝 = ⟨𝑥, 𝑦⟩ ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}))
17	9	adantl 487	. . . . . . . . . . . 12 ⊢ ((𝑝 = ⟨𝑥, 𝑦⟩ ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) → (𝑃 ⊆ (Pairs‘𝑉) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)))
18	17	adantld 496	. . . . . . . . . . 11 ⊢ ((𝑝 = ⟨𝑥, 𝑦⟩ ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) → ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)))
19	18	imp 412	. . . . . . . . . 10 ⊢ (((𝑝 = ⟨𝑥, 𝑦⟩ ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) ∧ (𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉))) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉))
20		eleq1 2848	. . . . . . . . . . . 12 ⊢ (𝑝 = ⟨𝑥, 𝑦⟩ → (𝑝 ∈ (𝑉 × 𝑉) ↔ ⟨𝑥, 𝑦⟩ ∈ (𝑉 × 𝑉)))
21	20	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝑝 = ⟨𝑥, 𝑦⟩ ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) ∧ (𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉))) → (𝑝 ∈ (𝑉 × 𝑉) ↔ ⟨𝑥, 𝑦⟩ ∈ (𝑉 × 𝑉)))
22		opelxp 5691	. . . . . . . . . . 11 ⊢ (⟨𝑥, 𝑦⟩ ∈ (𝑉 × 𝑉) ↔ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉))
23	21, 22	bitrdi 290	. . . . . . . . . 10 ⊢ (((𝑝 = ⟨𝑥, 𝑦⟩ ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) ∧ (𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉))) → (𝑝 ∈ (𝑉 × 𝑉) ↔ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)))
24	19, 23	mpbird 260	. . . . . . . . 9 ⊢ (((𝑝 = ⟨𝑥, 𝑦⟩ ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) ∧ (𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉))) → 𝑝 ∈ (𝑉 × 𝑉))
25	24	ex 418	. . . . . . . 8 ⊢ ((𝑝 = ⟨𝑥, 𝑦⟩ ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) → ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → 𝑝 ∈ (𝑉 × 𝑉)))
26	25	exlimivv 1965	. . . . . . 7 ⊢ (∃𝑥∃𝑦(𝑝 = ⟨𝑥, 𝑦⟩ ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) → ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → 𝑝 ∈ (𝑉 × 𝑉)))
27	16, 26	sylbi 220	. . . . . 6 ⊢ (𝑝 ∈ {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} → ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → 𝑝 ∈ (𝑉 × 𝑉)))
28	27	com12 33	. . . . 5 ⊢ ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → (𝑝 ∈ {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} → 𝑝 ∈ (𝑉 × 𝑉)))
29	28	ssrdv 3937	. . . 4 ⊢ ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} ⊆ (𝑉 × 𝑉))
30	15, 29	elpwd 4563	. . 3 ⊢ ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} ∈ 𝒫 (𝑉 × 𝑉))
31	30	ex 418	. 2 ⊢ (𝑉 ∈ V → (𝑃 ⊆ (Pairs‘𝑉) → {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} ∈ 𝒫 (𝑉 × 𝑉)))
32		fvprc 6870	. . . . 5 ⊢ (¬ 𝑉 ∈ V → (Pairs‘𝑉) = ∅)
33	32	sseq2d 3963	. . . 4 ⊢ (¬ 𝑉 ∈ V → (𝑃 ⊆ (Pairs‘𝑉) ↔ 𝑃 ⊆ ∅))
34		ss0b 4351	. . . 4 ⊢ (𝑃 ⊆ ∅ ↔ 𝑃 = ∅)
35	33, 34	bitrdi 290	. . 3 ⊢ (¬ 𝑉 ∈ V → (𝑃 ⊆ (Pairs‘𝑉) ↔ 𝑃 = ∅))
36		rex0 4308	. . . . . . 7 ⊢ ¬ ∃𝑐 ∈ ∅ 𝑐 = {𝑥, 𝑦}
37		rexeq 3315	. . . . . . 7 ⊢ (𝑃 = ∅ → (∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦} ↔ ∃𝑐 ∈ ∅ 𝑐 = {𝑥, 𝑦}))
38	36, 37	mtbiri 330	. . . . . 6 ⊢ (𝑃 = ∅ → ¬ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦})
39	38	alrimivv 1961	. . . . 5 ⊢ (𝑃 = ∅ → ∀𝑥∀𝑦 ¬ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦})
40		opab0 5533	. . . . 5 ⊢ ({⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} = ∅ ↔ ∀𝑥∀𝑦 ¬ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦})
41	39, 40	sylibr 237	. . . 4 ⊢ (𝑃 = ∅ → {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} = ∅)
42		0elpw 5320	. . . 4 ⊢ ∅ ∈ 𝒫 (𝑉 × 𝑉)
43	41, 42	eqeltrdi 2868	. . 3 ⊢ (𝑃 = ∅ → {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} ∈ 𝒫 (𝑉 × 𝑉))
44	35, 43	biimtrdi 256	. 2 ⊢ (¬ 𝑉 ∈ V → (𝑃 ⊆ (Pairs‘𝑉) → {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} ∈ 𝒫 (𝑉 × 𝑉)))
45	31, 44	pm2.61i 184	1 ⊢ (𝑃 ⊆ (Pairs‘𝑉) → {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} ∈ 𝒫 (𝑉 × 𝑉))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401  ∀wal 1568   = wceq 1570  ∃wex 1812   ∈ wcel 2145  ∃wrex 3086  Vcvv 3450   ⊆ wss 3899  ∅c0 4279  𝒫 cpw 4557  {cpr 4586  ⟨cop 4590  {copab 5167   × cxp 5653  ‘cfv 6533  Pairscspr 48377

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 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7736

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 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-id 5550  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-iota 6489  df-fun 6535  df-fv 6541  df-spr 48378

This theorem is used by:  sprsymrelfv  48394  sprsymrelf  48395