Theorem sprsymrelfvlem 48845

Description: Lemma for sprsymrelf 48850 and sprsymrelfv 48849. (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 2852	. . . . . . . . . . . 12 ⊢ (𝑐 = {𝑥, 𝑦} → (𝑐 ∈ 𝑃 ↔ {𝑥, 𝑦} ∈ 𝑃))
3		prsssprel 48843	. . . . . . . . . . . . . . 15 ⊢ ((𝑃 ⊆ (Pairs‘𝑉) ∧ {𝑥, 𝑦} ∈ 𝑃 ∧ (𝑥 ∈ V ∧ 𝑦 ∈ V)) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉))
4	3	3exp 1137	. . . . . . . . . . . . . 14 ⊢ (𝑃 ⊆ (Pairs‘𝑉) → ({𝑥, 𝑦} ∈ 𝑃 → ((𝑥 ∈ V ∧ 𝑦 ∈ V) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉))))
5	4	com13 89	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ V ∧ 𝑦 ∈ V) → ({𝑥, 𝑦} ∈ 𝑃 → (𝑃 ⊆ (Pairs‘𝑉) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉))))
6	5	el2v 3461	. . . . . . . . . . . 12 ⊢ ({𝑥, 𝑦} ∈ 𝑃 → (𝑃 ⊆ (Pairs‘𝑉) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)))
7	2, 6	biimtrdi 256	. . . . . . . . . . 11 ⊢ (𝑐 = {𝑥, 𝑦} → (𝑐 ∈ 𝑃 → (𝑃 ⊆ (Pairs‘𝑉) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉))))
8	7	com12 33	. . . . . . . . . 10 ⊢ (𝑐 ∈ 𝑃 → (𝑐 = {𝑥, 𝑦} → (𝑃 ⊆ (Pairs‘𝑉) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉))))
9	8	rexlimiv 3160	. . . . . . . . 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 8103	. . . 4 ⊢ ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} ∈ V)
16		elopab 5508	. . . . . . 7 ⊢ (𝑝 ∈ {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} ↔ ∃𝑥∃𝑦(𝑝 = ⟨𝑥, 𝑦⟩ ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}))
17	9	adantl 487	. . . . . . . . . . . 12 ⊢ ((𝑝 = ⟨𝑥, 𝑦⟩ ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) → (𝑃 ⊆ (Pairs‘𝑉) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)))
18	17	adantld 496	. . . . . . . . . . 11 ⊢ ((𝑝 = ⟨𝑥, 𝑦⟩ ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) → ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)))
19	18	imp 412	. . . . . . . . . 10 ⊢ (((𝑝 = ⟨𝑥, 𝑦⟩ ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) ∧ (𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉))) → (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉))
20		eleq1 2852	. . . . . . . . . . . 12 ⊢ (𝑝 = ⟨𝑥, 𝑦⟩ → (𝑝 ∈ (𝑉 × 𝑉) ↔ ⟨𝑥, 𝑦⟩ ∈ (𝑉 × 𝑉)))
21	20	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝑝 = ⟨𝑥, 𝑦⟩ ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) ∧ (𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉))) → (𝑝 ∈ (𝑉 × 𝑉) ↔ ⟨𝑥, 𝑦⟩ ∈ (𝑉 × 𝑉)))
22		opelxp 5694	. . . . . . . . . . 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 1967	. . . . . . 7 ⊢ (∃𝑥∃𝑦(𝑝 = ⟨𝑥, 𝑦⟩ ∧ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}) → ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → 𝑝 ∈ (𝑉 × 𝑉)))
27	16, 26	sylbi 220	. . . . . 6 ⊢ (𝑝 ∈ {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} → ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → 𝑝 ∈ (𝑉 × 𝑉)))
28	27	com12 33	. . . . 5 ⊢ ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → (𝑝 ∈ {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} → 𝑝 ∈ (𝑉 × 𝑉)))
29	28	ssrdv 3919	. . . 4 ⊢ ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} ⊆ (𝑉 × 𝑉))
30	15, 29	elpwd 4566	. . 3 ⊢ ((𝑉 ∈ V ∧ 𝑃 ⊆ (Pairs‘𝑉)) → {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} ∈ 𝒫 (𝑉 × 𝑉))
31	30	ex 418	. 2 ⊢ (𝑉 ∈ V → (𝑃 ⊆ (Pairs‘𝑉) → {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} ∈ 𝒫 (𝑉 × 𝑉)))
32		fvprc 6908	. . . . 5 ⊢ (¬ 𝑉 ∈ V → (Pairs‘𝑉) = ∅)
33	32	sseq2d 3945	. . . 4 ⊢ (¬ 𝑉 ∈ V → (𝑃 ⊆ (Pairs‘𝑉) ↔ 𝑃 ⊆ ∅))
34		ss0b 4354	. . . 4 ⊢ (𝑃 ⊆ ∅ ↔ 𝑃 = ∅)
35	33, 34	bitrdi 290	. . 3 ⊢ (¬ 𝑉 ∈ V → (𝑃 ⊆ (Pairs‘𝑉) ↔ 𝑃 = ∅))
36		rex0 4311	. . . . . . 7 ⊢ ¬ ∃𝑐 ∈ ∅ 𝑐 = {𝑥, 𝑦}
37		rexeq 3319	. . . . . . 7 ⊢ (𝑃 = ∅ → (∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦} ↔ ∃𝑐 ∈ ∅ 𝑐 = {𝑥, 𝑦}))
38	36, 37	mtbiri 330	. . . . . 6 ⊢ (𝑃 = ∅ → ¬ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦})
39	38	alrimivv 1963	. . . . 5 ⊢ (𝑃 = ∅ → ∀𝑥∀𝑦 ¬ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦})
40		opab0 5536	. . . . 5 ⊢ ({⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} = ∅ ↔ ∀𝑥∀𝑦 ¬ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦})
41	39, 40	sylibr 237	. . . 4 ⊢ (𝑃 = ∅ → {⟨𝑥, 𝑦⟩ ∣ ∃𝑐 ∈ 𝑃 𝑐 = {𝑥, 𝑦}} = ∅)
42		0elpw 5324	. . . 4 ⊢ ∅ ∈ 𝒫 (𝑉 × 𝑉)
43	41, 42	eqeltrdi 2872	. . 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 2147  ∃wrex 3090  Vcvv 3454   ⊆ wss 3900  ∅c0 4281  𝒫 cpw 4560  {cpr 4590  ⟨cop 4840  {copab 5173   × cxp 5656  ‘cfv 6566  Pairscspr 48832

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-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-iun 4958  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-iota 6520  df-fun 6568  df-fv 6574  df-spr 48833

This theorem is used by:  sprsymrelfv  48849  sprsymrelf  48850