Theorem tpostpos 8266

Description: Value of the double transposition for a general class 𝐹. (Contributed by Mario Carneiro, 16-Sep-2015.)

Assertion

Ref	Expression
tpostpos	⊢ tpos tpos 𝐹 = (𝐹 ∩ (((V × V) ∪ {∅}) × V))

Proof of Theorem tpostpos

Dummy variables 𝑥 𝑦 𝑤 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		reltpos 8251	. 2 ⊢ Rel tpos tpos 𝐹
2		relinxp 5791	. 2 ⊢ Rel (𝐹 ∩ (((V × V) ∪ {∅}) × V))
3		relcnv 6099	. . . . . . . . 9 ⊢ Rel ◡dom tpos 𝐹
4		df-rel 5657	. . . . . . . . 9 ⊢ (Rel ◡dom tpos 𝐹 ↔ ◡dom tpos 𝐹 ⊆ (V × V))
5	3, 4	mpbi 233	. . . . . . . 8 ⊢ ◡dom tpos 𝐹 ⊆ (V × V)
6		simpl 488	. . . . . . . 8 ⊢ ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) → 𝑤 ∈ ◡dom tpos 𝐹)
7	5, 6	sselid 3906	. . . . . . 7 ⊢ ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) → 𝑤 ∈ (V × V))
8		simpr 490	. . . . . . 7 ⊢ ((𝑤𝐹𝑧 ∧ 𝑤 ∈ (V × V)) → 𝑤 ∈ (V × V))
9		elvv 5725	. . . . . . . . 9 ⊢ (𝑤 ∈ (V × V) ↔ ∃𝑥∃𝑦 𝑤 = ⟨𝑥, 𝑦⟩)
10		eleq1 2848	. . . . . . . . . . . . . 14 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → (𝑤 ∈ ◡dom tpos 𝐹 ↔ ⟨𝑥, 𝑦⟩ ∈ ◡dom tpos 𝐹))
11		vex 3454	. . . . . . . . . . . . . . 15 ⊢ 𝑥 ∈ V
12		vex 3454	. . . . . . . . . . . . . . 15 ⊢ 𝑦 ∈ V
13	11, 12	opelcnv 5858	. . . . . . . . . . . . . 14 ⊢ (⟨𝑥, 𝑦⟩ ∈ ◡dom tpos 𝐹 ↔ ⟨𝑦, 𝑥⟩ ∈ dom tpos 𝐹)
14	10, 13	bitrdi 290	. . . . . . . . . . . . 13 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → (𝑤 ∈ ◡dom tpos 𝐹 ↔ ⟨𝑦, 𝑥⟩ ∈ dom tpos 𝐹))
15		sneq 4590	. . . . . . . . . . . . . . . . 17 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → {𝑤} = {⟨𝑥, 𝑦⟩})
16	15	cnveqd 5852	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → ◡{𝑤} = ◡{⟨𝑥, 𝑦⟩})
17	16	unieqd 4879	. . . . . . . . . . . . . . 15 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → ∪ ◡{𝑤} = ∪ ◡{⟨𝑥, 𝑦⟩})
18		opswap 6230	. . . . . . . . . . . . . . 15 ⊢ ∪ ◡{⟨𝑥, 𝑦⟩} = ⟨𝑦, 𝑥⟩
19	17, 18	eqtrdi 2811	. . . . . . . . . . . . . 14 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → ∪ ◡{𝑤} = ⟨𝑦, 𝑥⟩)
20	19	breq1d 5112	. . . . . . . . . . . . 13 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → (∪ ◡{𝑤}tpos 𝐹𝑧 ↔ ⟨𝑦, 𝑥⟩tpos 𝐹𝑧))
21	14, 20	anbi12d 644	. . . . . . . . . . . 12 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ (⟨𝑦, 𝑥⟩ ∈ dom tpos 𝐹 ∧ ⟨𝑦, 𝑥⟩tpos 𝐹𝑧)))
22		opex 5431	. . . . . . . . . . . . . . 15 ⊢ ⟨𝑦, 𝑥⟩ ∈ V
23		vex 3454	. . . . . . . . . . . . . . 15 ⊢ 𝑧 ∈ V
24	22, 23	breldm 5889	. . . . . . . . . . . . . 14 ⊢ (⟨𝑦, 𝑥⟩tpos 𝐹𝑧 → ⟨𝑦, 𝑥⟩ ∈ dom tpos 𝐹)
25	24	pm4.71ri 570	. . . . . . . . . . . . 13 ⊢ (⟨𝑦, 𝑥⟩tpos 𝐹𝑧 ↔ (⟨𝑦, 𝑥⟩ ∈ dom tpos 𝐹 ∧ ⟨𝑦, 𝑥⟩tpos 𝐹𝑧))
26		brtpos 8255	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ V → (⟨𝑦, 𝑥⟩tpos 𝐹𝑧 ↔ ⟨𝑥, 𝑦⟩𝐹𝑧))
27	26	elv 3455	. . . . . . . . . . . . 13 ⊢ (⟨𝑦, 𝑥⟩tpos 𝐹𝑧 ↔ ⟨𝑥, 𝑦⟩𝐹𝑧)
28	25, 27	bitr3i 280	. . . . . . . . . . . 12 ⊢ ((⟨𝑦, 𝑥⟩ ∈ dom tpos 𝐹 ∧ ⟨𝑦, 𝑥⟩tpos 𝐹𝑧) ↔ ⟨𝑥, 𝑦⟩𝐹𝑧)
29	21, 28	bitrdi 290	. . . . . . . . . . 11 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ ⟨𝑥, 𝑦⟩𝐹𝑧))
30		breq1 5105	. . . . . . . . . . 11 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → (𝑤𝐹𝑧 ↔ ⟨𝑥, 𝑦⟩𝐹𝑧))
31	29, 30	bitr4d 285	. . . . . . . . . 10 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ 𝑤𝐹𝑧))
32	31	exlimivv 1964	. . . . . . . . 9 ⊢ (∃𝑥∃𝑦 𝑤 = ⟨𝑥, 𝑦⟩ → ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ 𝑤𝐹𝑧))
33	9, 32	sylbi 220	. . . . . . . 8 ⊢ (𝑤 ∈ (V × V) → ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ 𝑤𝐹𝑧))
34		iba 537	. . . . . . . 8 ⊢ (𝑤 ∈ (V × V) → (𝑤𝐹𝑧 ↔ (𝑤𝐹𝑧 ∧ 𝑤 ∈ (V × V))))
35	33, 34	bitrd 282	. . . . . . 7 ⊢ (𝑤 ∈ (V × V) → ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ (𝑤𝐹𝑧 ∧ 𝑤 ∈ (V × V))))
36	7, 8, 35	pm5.21nii 381	. . . . . 6 ⊢ ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ (𝑤𝐹𝑧 ∧ 𝑤 ∈ (V × V)))
37		elsni 4597	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 ∈ {∅} → 𝑤 = ∅)
38	37	sneqd 4592	. . . . . . . . . . . . . . 15 ⊢ (𝑤 ∈ {∅} → {𝑤} = {∅})
39	38	cnveqd 5852	. . . . . . . . . . . . . 14 ⊢ (𝑤 ∈ {∅} → ◡{𝑤} = ◡{∅})
40		cnvsn0 6211	. . . . . . . . . . . . . 14 ⊢ ◡{∅} = ∅
41	39, 40	eqtrdi 2811	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ {∅} → ◡{𝑤} = ∅)
42	41	unieqd 4879	. . . . . . . . . . . 12 ⊢ (𝑤 ∈ {∅} → ∪ ◡{𝑤} = ∪ ∅)
43		uni0 4895	. . . . . . . . . . . 12 ⊢ ∪ ∅ = ∅
44	42, 43	eqtrdi 2811	. . . . . . . . . . 11 ⊢ (𝑤 ∈ {∅} → ∪ ◡{𝑤} = ∅)
45	44	breq1d 5112	. . . . . . . . . 10 ⊢ (𝑤 ∈ {∅} → (∪ ◡{𝑤}tpos 𝐹𝑧 ↔ ∅tpos 𝐹𝑧))
46		brtpos0 8253	. . . . . . . . . . 11 ⊢ (𝑧 ∈ V → (∅tpos 𝐹𝑧 ↔ ∅𝐹𝑧))
47	46	elv 3455	. . . . . . . . . 10 ⊢ (∅tpos 𝐹𝑧 ↔ ∅𝐹𝑧)
48	45, 47	bitrdi 290	. . . . . . . . 9 ⊢ (𝑤 ∈ {∅} → (∪ ◡{𝑤}tpos 𝐹𝑧 ↔ ∅𝐹𝑧))
49	37	breq1d 5112	. . . . . . . . 9 ⊢ (𝑤 ∈ {∅} → (𝑤𝐹𝑧 ↔ ∅𝐹𝑧))
50	48, 49	bitr4d 285	. . . . . . . 8 ⊢ (𝑤 ∈ {∅} → (∪ ◡{𝑤}tpos 𝐹𝑧 ↔ 𝑤𝐹𝑧))
51	50	pm5.32i 585	. . . . . . 7 ⊢ ((𝑤 ∈ {∅} ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ (𝑤 ∈ {∅} ∧ 𝑤𝐹𝑧))
52	51	biancomi 468	. . . . . 6 ⊢ ((𝑤 ∈ {∅} ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ (𝑤𝐹𝑧 ∧ 𝑤 ∈ {∅}))
53	36, 52	orbi12i 928	. . . . 5 ⊢ (((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ∨ (𝑤 ∈ {∅} ∧ ∪ ◡{𝑤}tpos 𝐹𝑧)) ↔ ((𝑤𝐹𝑧 ∧ 𝑤 ∈ (V × V)) ∨ (𝑤𝐹𝑧 ∧ 𝑤 ∈ {∅})))
54		andir 1026	. . . . 5 ⊢ (((𝑤 ∈ ◡dom tpos 𝐹 ∨ 𝑤 ∈ {∅}) ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ∨ (𝑤 ∈ {∅} ∧ ∪ ◡{𝑤}tpos 𝐹𝑧)))
55		andi 1025	. . . . 5 ⊢ ((𝑤𝐹𝑧 ∧ (𝑤 ∈ (V × V) ∨ 𝑤 ∈ {∅})) ↔ ((𝑤𝐹𝑧 ∧ 𝑤 ∈ (V × V)) ∨ (𝑤𝐹𝑧 ∧ 𝑤 ∈ {∅})))
56	53, 54, 55	3bitr4i 306	. . . 4 ⊢ (((𝑤 ∈ ◡dom tpos 𝐹 ∨ 𝑤 ∈ {∅}) ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ (𝑤𝐹𝑧 ∧ (𝑤 ∈ (V × V) ∨ 𝑤 ∈ {∅})))
57		elun 4152	. . . . 5 ⊢ (𝑤 ∈ (◡dom tpos 𝐹 ∪ {∅}) ↔ (𝑤 ∈ ◡dom tpos 𝐹 ∨ 𝑤 ∈ {∅}))
58	57	anbi1i 636	. . . 4 ⊢ ((𝑤 ∈ (◡dom tpos 𝐹 ∪ {∅}) ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ ((𝑤 ∈ ◡dom tpos 𝐹 ∨ 𝑤 ∈ {∅}) ∧ ∪ ◡{𝑤}tpos 𝐹𝑧))
59		brxp 5699	. . . . . . 7 ⊢ (𝑤(((V × V) ∪ {∅}) × V)𝑧 ↔ (𝑤 ∈ ((V × V) ∪ {∅}) ∧ 𝑧 ∈ V))
60	23, 59	mpbiran2 723	. . . . . 6 ⊢ (𝑤(((V × V) ∪ {∅}) × V)𝑧 ↔ 𝑤 ∈ ((V × V) ∪ {∅}))
61		elun 4152	. . . . . 6 ⊢ (𝑤 ∈ ((V × V) ∪ {∅}) ↔ (𝑤 ∈ (V × V) ∨ 𝑤 ∈ {∅}))
62	60, 61	bitri 278	. . . . 5 ⊢ (𝑤(((V × V) ∪ {∅}) × V)𝑧 ↔ (𝑤 ∈ (V × V) ∨ 𝑤 ∈ {∅}))
63	62	anbi2i 635	. . . 4 ⊢ ((𝑤𝐹𝑧 ∧ 𝑤(((V × V) ∪ {∅}) × V)𝑧) ↔ (𝑤𝐹𝑧 ∧ (𝑤 ∈ (V × V) ∨ 𝑤 ∈ {∅})))
64	56, 58, 63	3bitr4i 306	. . 3 ⊢ ((𝑤 ∈ (◡dom tpos 𝐹 ∪ {∅}) ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ (𝑤𝐹𝑧 ∧ 𝑤(((V × V) ∪ {∅}) × V)𝑧))
65		brtpos2 8252	. . . 4 ⊢ (𝑧 ∈ V → (𝑤tpos tpos 𝐹𝑧 ↔ (𝑤 ∈ (◡dom tpos 𝐹 ∪ {∅}) ∧ ∪ ◡{𝑤}tpos 𝐹𝑧)))
66	65	elv 3455	. . 3 ⊢ (𝑤tpos tpos 𝐹𝑧 ↔ (𝑤 ∈ (◡dom tpos 𝐹 ∪ {∅}) ∧ ∪ ◡{𝑤}tpos 𝐹𝑧))
67		brin 5156	. . 3 ⊢ (𝑤(𝐹 ∩ (((V × V) ∪ {∅}) × V))𝑧 ↔ (𝑤𝐹𝑧 ∧ 𝑤(((V × V) ∪ {∅}) × V)𝑧))
68	64, 66, 67	3bitr4i 306	. 2 ⊢ (𝑤tpos tpos 𝐹𝑧 ↔ 𝑤(𝐹 ∩ (((V × V) ∪ {∅}) × V))𝑧)
69	1, 2, 68	eqbrriv 5766	1 ⊢ tpos tpos 𝐹 = (𝐹 ∩ (((V × V) ∪ {∅}) × V))

This proof depends on syntax axioms:   ↔ wb 209   ∧ wa 401   ∨ wo 861   = wceq 1569  ∃wex 1811   ∈ wcel 2144  Vcvv 3450   ⊆ wss 3895   ∩ cin 4089   ∪ cun 4149  ∅c0 4278  {csn 4584  ⟨cop 4834  ∪ cuni 4866   class class class wbr 5102   × cxp 5648  ^◡ccnv 5649  dom cdm 5650  Rel wrel 5655  tpos ctpos 8245

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7751

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  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-ss 3896  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-br 5103  df-opab 5167  df-mpt 5186  df-id 5545  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-iota 6494  df-fun 6540  df-fn 6541  df-fv 6546  df-tpos 8246

This theorem is used by:  tpostpos2  8267