Theorem fnpr2ob 17637

Description: Biconditional version of fnpr2o 17636. (Contributed by Jim Kingdon, 27-Sep-2023.)

Assertion

Ref	Expression
fnpr2ob	⊢ ((𝐴 ∈ V ∧ 𝐵 ∈ V) ↔ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} Fn 2o)

Proof of Theorem fnpr2ob

Dummy variable 𝑘 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		fnpr2o 17636	. 2 ⊢ ((𝐴 ∈ V ∧ 𝐵 ∈ V) → {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} Fn 2o)
2		0ex 5275	. . . . . . . 8 ⊢ ∅ ∈ V
3	2	prid1 4733	. . . . . . 7 ⊢ ∅ ∈ {∅, 1o}
4		df2o3 8470	. . . . . . 7 ⊢ 2o = {∅, 1o}
5	3, 4	eleqtrri 2865	. . . . . 6 ⊢ ∅ ∈ 2o
6		fndm 6645	. . . . . 6 ⊢ ({⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} Fn 2o → dom {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} = 2o)
7	5, 6	eleqtrrid 2873	. . . . 5 ⊢ ({⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} Fn 2o → ∅ ∈ dom {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩})
8	2	eldm2 5896	. . . . 5 ⊢ (∅ ∈ dom {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} ↔ ∃𝑘⟨∅, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩})
9	7, 8	sylib 221	. . . 4 ⊢ ({⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} Fn 2o → ∃𝑘⟨∅, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩})
10		1n0 8481	. . . . . . . . . . 11 ⊢ 1o ≠ ∅
11	10	nesymi 3018	. . . . . . . . . 10 ⊢ ¬ ∅ = 1o
12		vex 3462	. . . . . . . . . . 11 ⊢ 𝑘 ∈ V
13	2, 12	opth1 5462	. . . . . . . . . 10 ⊢ (⟨∅, 𝑘⟩ = ⟨1o, 𝐵⟩ → ∅ = 1o)
14	11, 13	mto 200	. . . . . . . . 9 ⊢ ¬ ⟨∅, 𝑘⟩ = ⟨1o, 𝐵⟩
15		elpri 4618	. . . . . . . . 9 ⊢ (⟨∅, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} → (⟨∅, 𝑘⟩ = ⟨∅, 𝐴⟩ ∨ ⟨∅, 𝑘⟩ = ⟨1o, 𝐵⟩))
16		orel2 904	. . . . . . . . 9 ⊢ (¬ ⟨∅, 𝑘⟩ = ⟨1o, 𝐵⟩ → ((⟨∅, 𝑘⟩ = ⟨∅, 𝐴⟩ ∨ ⟨∅, 𝑘⟩ = ⟨1o, 𝐵⟩) → ⟨∅, 𝑘⟩ = ⟨∅, 𝐴⟩))
17	14, 15, 16	mpsyl 69	. . . . . . . 8 ⊢ (⟨∅, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} → ⟨∅, 𝑘⟩ = ⟨∅, 𝐴⟩)
18	2, 12	opth 5463	. . . . . . . 8 ⊢ (⟨∅, 𝑘⟩ = ⟨∅, 𝐴⟩ ↔ (∅ = ∅ ∧ 𝑘 = 𝐴))
19	17, 18	sylib 221	. . . . . . 7 ⊢ (⟨∅, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} → (∅ = ∅ ∧ 𝑘 = 𝐴))
20	19	simprd 501	. . . . . 6 ⊢ (⟨∅, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} → 𝑘 = 𝐴)
21	20	eximi 1868	. . . . 5 ⊢ (∃𝑘⟨∅, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} → ∃𝑘 𝑘 = 𝐴)
22		isset 3472	. . . . 5 ⊢ (𝐴 ∈ V ↔ ∃𝑘 𝑘 = 𝐴)
23	21, 22	sylibr 237	. . . 4 ⊢ (∃𝑘⟨∅, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} → 𝐴 ∈ V)
24	9, 23	syl 18	. . 3 ⊢ ({⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} Fn 2o → 𝐴 ∈ V)
25		1oelpr 8473	. . . . . . 7 ⊢ 1o ∈ {∅, 1o}
26	25, 4	eleqtrri 2865	. . . . . 6 ⊢ 1o ∈ 2o
27	26, 6	eleqtrrid 2873	. . . . 5 ⊢ ({⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} Fn 2o → 1o ∈ dom {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩})
28		1oex 8472	. . . . . 6 ⊢ 1o ∈ V
29	28	eldm2 5896	. . . . 5 ⊢ (1o ∈ dom {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} ↔ ∃𝑘⟨1o, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩})
30	27, 29	sylib 221	. . . 4 ⊢ ({⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} Fn 2o → ∃𝑘⟨1o, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩})
31	10	neii 2963	. . . . . . . . . 10 ⊢ ¬ 1o = ∅
32	28, 12	opth1 5462	. . . . . . . . . 10 ⊢ (⟨1o, 𝑘⟩ = ⟨∅, 𝐴⟩ → 1o = ∅)
33	31, 32	mto 200	. . . . . . . . 9 ⊢ ¬ ⟨1o, 𝑘⟩ = ⟨∅, 𝐴⟩
34		elpri 4618	. . . . . . . . . 10 ⊢ (⟨1o, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} → (⟨1o, 𝑘⟩ = ⟨∅, 𝐴⟩ ∨ ⟨1o, 𝑘⟩ = ⟨1o, 𝐵⟩))
35	34	orcomd 885	. . . . . . . . 9 ⊢ (⟨1o, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} → (⟨1o, 𝑘⟩ = ⟨1o, 𝐵⟩ ∨ ⟨1o, 𝑘⟩ = ⟨∅, 𝐴⟩))
36		orel2 904	. . . . . . . . 9 ⊢ (¬ ⟨1o, 𝑘⟩ = ⟨∅, 𝐴⟩ → ((⟨1o, 𝑘⟩ = ⟨1o, 𝐵⟩ ∨ ⟨1o, 𝑘⟩ = ⟨∅, 𝐴⟩) → ⟨1o, 𝑘⟩ = ⟨1o, 𝐵⟩))
37	33, 35, 36	mpsyl 69	. . . . . . . 8 ⊢ (⟨1o, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} → ⟨1o, 𝑘⟩ = ⟨1o, 𝐵⟩)
38	28, 12	opth 5463	. . . . . . . 8 ⊢ (⟨1o, 𝑘⟩ = ⟨1o, 𝐵⟩ ↔ (1o = 1o ∧ 𝑘 = 𝐵))
39	37, 38	sylib 221	. . . . . . 7 ⊢ (⟨1o, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} → (1o = 1o ∧ 𝑘 = 𝐵))
40	39	simprd 501	. . . . . 6 ⊢ (⟨1o, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} → 𝑘 = 𝐵)
41	40	eximi 1868	. . . . 5 ⊢ (∃𝑘⟨1o, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} → ∃𝑘 𝑘 = 𝐵)
42		isset 3472	. . . . 5 ⊢ (𝐵 ∈ V ↔ ∃𝑘 𝑘 = 𝐵)
43	41, 42	sylibr 237	. . . 4 ⊢ (∃𝑘⟨1o, 𝑘⟩ ∈ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} → 𝐵 ∈ V)
44	30, 43	syl 18	. . 3 ⊢ ({⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} Fn 2o → 𝐵 ∈ V)
45	24, 44	jca 521	. 2 ⊢ ({⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} Fn 2o → (𝐴 ∈ V ∧ 𝐵 ∈ V))
46	1, 45	impbii 212	1 ⊢ ((𝐴 ∈ V ∧ 𝐵 ∈ V) ↔ {⟨∅, 𝐴⟩, ⟨1o, 𝐵⟩} Fn 2o)

This proof depends on syntax axioms:  ¬ wn 3   ↔ wb 209   ∧ wa 401   ∨ wo 861   = wceq 1570  ∃wex 1812   ∈ wcel 2146  Vcvv 3458  ∅c0 4289  {cpr 4596  ⟨cop 4600  dom cdm 5666   Fn wfn 6538  1_oc1o 8455  2_oc2o 8456

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 2148  ax-9 2156  ax-12 2216  ax-ext 2738  ax-sep 5262  ax-nul 5274  ax-pr 5409

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-sb 2100  df-mo 2570  df-clab 2745  df-cleq 2758  df-clel 2841  df-ne 2962  df-ral 3083  df-rex 3093  df-rab 3420  df-v 3460  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3928  df-nul 4290  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4878  df-br 5115  df-opab 5179  df-tr 5224  df-id 5561  df-eprel 5566  df-po 5574  df-so 5575  df-fr 5619  df-we 5621  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-ord 6370  df-on 6371  df-lim 6372  df-suc 6373  df-fun 6545  df-fn 6546  df-om 7872  df-1o 8462  df-2o 8463

This theorem is used by:  xpsfrnel2  17643