Theorem tpostpos 7906

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 7891	. 2 ⊢ Rel tpos tpos 𝐹
2		relinxp 5682	. 2 ⊢ Rel (𝐹 ∩ (((V × V) ∪ {∅}) × V))
3		relcnv 5962	. . . . . . . . 9 ⊢ Rel ◡dom tpos 𝐹
4		df-rel 5557	. . . . . . . . 9 ⊢ (Rel ◡dom tpos 𝐹 ↔ ◡dom tpos 𝐹 ⊆ (V × V))
5	3, 4	mpbi 232	. . . . . . . 8 ⊢ ◡dom tpos 𝐹 ⊆ (V × V)
6		simpl 485	. . . . . . . 8 ⊢ ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) → 𝑤 ∈ ◡dom tpos 𝐹)
7	5, 6	sseldi 3965	. . . . . . 7 ⊢ ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) → 𝑤 ∈ (V × V))
8		simpr 487	. . . . . . 7 ⊢ ((𝑤𝐹𝑧 ∧ 𝑤 ∈ (V × V)) → 𝑤 ∈ (V × V))
9		elvv 5621	. . . . . . . . 9 ⊢ (𝑤 ∈ (V × V) ↔ ∃𝑥∃𝑦 𝑤 = ⟨𝑥, 𝑦⟩)
10		eleq1 2900	. . . . . . . . . . . . . 14 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → (𝑤 ∈ ◡dom tpos 𝐹 ↔ ⟨𝑥, 𝑦⟩ ∈ ◡dom tpos 𝐹))
11		vex 3498	. . . . . . . . . . . . . . 15 ⊢ 𝑥 ∈ V
12		vex 3498	. . . . . . . . . . . . . . 15 ⊢ 𝑦 ∈ V
13	11, 12	opelcnv 5747	. . . . . . . . . . . . . 14 ⊢ (⟨𝑥, 𝑦⟩ ∈ ◡dom tpos 𝐹 ↔ ⟨𝑦, 𝑥⟩ ∈ dom tpos 𝐹)
14	10, 13	syl6bb 289	. . . . . . . . . . . . 13 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → (𝑤 ∈ ◡dom tpos 𝐹 ↔ ⟨𝑦, 𝑥⟩ ∈ dom tpos 𝐹))
15		sneq 4571	. . . . . . . . . . . . . . . . 17 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → {𝑤} = {⟨𝑥, 𝑦⟩})
16	15	cnveqd 5741	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → ◡{𝑤} = ◡{⟨𝑥, 𝑦⟩})
17	16	unieqd 4842	. . . . . . . . . . . . . . 15 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → ∪ ◡{𝑤} = ∪ ◡{⟨𝑥, 𝑦⟩})
18		opswap 6081	. . . . . . . . . . . . . . 15 ⊢ ∪ ◡{⟨𝑥, 𝑦⟩} = ⟨𝑦, 𝑥⟩
19	17, 18	syl6eq 2872	. . . . . . . . . . . . . 14 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → ∪ ◡{𝑤} = ⟨𝑦, 𝑥⟩)
20	19	breq1d 5069	. . . . . . . . . . . . 13 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → (∪ ◡{𝑤}tpos 𝐹𝑧 ↔ ⟨𝑦, 𝑥⟩tpos 𝐹𝑧))
21	14, 20	anbi12d 632	. . . . . . . . . . . 12 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ (⟨𝑦, 𝑥⟩ ∈ dom tpos 𝐹 ∧ ⟨𝑦, 𝑥⟩tpos 𝐹𝑧)))
22		opex 5349	. . . . . . . . . . . . . . 15 ⊢ ⟨𝑦, 𝑥⟩ ∈ V
23		vex 3498	. . . . . . . . . . . . . . 15 ⊢ 𝑧 ∈ V
24	22, 23	breldm 5772	. . . . . . . . . . . . . 14 ⊢ (⟨𝑦, 𝑥⟩tpos 𝐹𝑧 → ⟨𝑦, 𝑥⟩ ∈ dom tpos 𝐹)
25	24	pm4.71ri 563	. . . . . . . . . . . . 13 ⊢ (⟨𝑦, 𝑥⟩tpos 𝐹𝑧 ↔ (⟨𝑦, 𝑥⟩ ∈ dom tpos 𝐹 ∧ ⟨𝑦, 𝑥⟩tpos 𝐹𝑧))
26		brtpos 7895	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ V → (⟨𝑦, 𝑥⟩tpos 𝐹𝑧 ↔ ⟨𝑥, 𝑦⟩𝐹𝑧))
27	26	elv 3500	. . . . . . . . . . . . 13 ⊢ (⟨𝑦, 𝑥⟩tpos 𝐹𝑧 ↔ ⟨𝑥, 𝑦⟩𝐹𝑧)
28	25, 27	bitr3i 279	. . . . . . . . . . . 12 ⊢ ((⟨𝑦, 𝑥⟩ ∈ dom tpos 𝐹 ∧ ⟨𝑦, 𝑥⟩tpos 𝐹𝑧) ↔ ⟨𝑥, 𝑦⟩𝐹𝑧)
29	21, 28	syl6bb 289	. . . . . . . . . . 11 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ ⟨𝑥, 𝑦⟩𝐹𝑧))
30		breq1 5062	. . . . . . . . . . 11 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → (𝑤𝐹𝑧 ↔ ⟨𝑥, 𝑦⟩𝐹𝑧))
31	29, 30	bitr4d 284	. . . . . . . . . 10 ⊢ (𝑤 = ⟨𝑥, 𝑦⟩ → ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ 𝑤𝐹𝑧))
32	31	exlimivv 1929	. . . . . . . . 9 ⊢ (∃𝑥∃𝑦 𝑤 = ⟨𝑥, 𝑦⟩ → ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ 𝑤𝐹𝑧))
33	9, 32	sylbi 219	. . . . . . . 8 ⊢ (𝑤 ∈ (V × V) → ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ 𝑤𝐹𝑧))
34		iba 530	. . . . . . . 8 ⊢ (𝑤 ∈ (V × V) → (𝑤𝐹𝑧 ↔ (𝑤𝐹𝑧 ∧ 𝑤 ∈ (V × V))))
35	33, 34	bitrd 281	. . . . . . 7 ⊢ (𝑤 ∈ (V × V) → ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ (𝑤𝐹𝑧 ∧ 𝑤 ∈ (V × V))))
36	7, 8, 35	pm5.21nii 382	. . . . . 6 ⊢ ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ (𝑤𝐹𝑧 ∧ 𝑤 ∈ (V × V)))
37		elsni 4578	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 ∈ {∅} → 𝑤 = ∅)
38	37	sneqd 4573	. . . . . . . . . . . . . . 15 ⊢ (𝑤 ∈ {∅} → {𝑤} = {∅})
39	38	cnveqd 5741	. . . . . . . . . . . . . 14 ⊢ (𝑤 ∈ {∅} → ◡{𝑤} = ◡{∅})
40		cnvsn0 6062	. . . . . . . . . . . . . 14 ⊢ ◡{∅} = ∅
41	39, 40	syl6eq 2872	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ {∅} → ◡{𝑤} = ∅)
42	41	unieqd 4842	. . . . . . . . . . . 12 ⊢ (𝑤 ∈ {∅} → ∪ ◡{𝑤} = ∪ ∅)
43		uni0 4859	. . . . . . . . . . . 12 ⊢ ∪ ∅ = ∅
44	42, 43	syl6eq 2872	. . . . . . . . . . 11 ⊢ (𝑤 ∈ {∅} → ∪ ◡{𝑤} = ∅)
45	44	breq1d 5069	. . . . . . . . . 10 ⊢ (𝑤 ∈ {∅} → (∪ ◡{𝑤}tpos 𝐹𝑧 ↔ ∅tpos 𝐹𝑧))
46		brtpos0 7893	. . . . . . . . . . 11 ⊢ (𝑧 ∈ V → (∅tpos 𝐹𝑧 ↔ ∅𝐹𝑧))
47	46	elv 3500	. . . . . . . . . 10 ⊢ (∅tpos 𝐹𝑧 ↔ ∅𝐹𝑧)
48	45, 47	syl6bb 289	. . . . . . . . 9 ⊢ (𝑤 ∈ {∅} → (∪ ◡{𝑤}tpos 𝐹𝑧 ↔ ∅𝐹𝑧))
49	37	breq1d 5069	. . . . . . . . 9 ⊢ (𝑤 ∈ {∅} → (𝑤𝐹𝑧 ↔ ∅𝐹𝑧))
50	48, 49	bitr4d 284	. . . . . . . 8 ⊢ (𝑤 ∈ {∅} → (∪ ◡{𝑤}tpos 𝐹𝑧 ↔ 𝑤𝐹𝑧))
51	50	pm5.32i 577	. . . . . . 7 ⊢ ((𝑤 ∈ {∅} ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ (𝑤 ∈ {∅} ∧ 𝑤𝐹𝑧))
52	51	biancomi 465	. . . . . 6 ⊢ ((𝑤 ∈ {∅} ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ (𝑤𝐹𝑧 ∧ 𝑤 ∈ {∅}))
53	36, 52	orbi12i 911	. . . . 5 ⊢ (((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ∨ (𝑤 ∈ {∅} ∧ ∪ ◡{𝑤}tpos 𝐹𝑧)) ↔ ((𝑤𝐹𝑧 ∧ 𝑤 ∈ (V × V)) ∨ (𝑤𝐹𝑧 ∧ 𝑤 ∈ {∅})))
54		andir 1005	. . . . 5 ⊢ (((𝑤 ∈ ◡dom tpos 𝐹 ∨ 𝑤 ∈ {∅}) ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ ((𝑤 ∈ ◡dom tpos 𝐹 ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ∨ (𝑤 ∈ {∅} ∧ ∪ ◡{𝑤}tpos 𝐹𝑧)))
55		andi 1004	. . . . 5 ⊢ ((𝑤𝐹𝑧 ∧ (𝑤 ∈ (V × V) ∨ 𝑤 ∈ {∅})) ↔ ((𝑤𝐹𝑧 ∧ 𝑤 ∈ (V × V)) ∨ (𝑤𝐹𝑧 ∧ 𝑤 ∈ {∅})))
56	53, 54, 55	3bitr4i 305	. . . 4 ⊢ (((𝑤 ∈ ◡dom tpos 𝐹 ∨ 𝑤 ∈ {∅}) ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ (𝑤𝐹𝑧 ∧ (𝑤 ∈ (V × V) ∨ 𝑤 ∈ {∅})))
57		elun 4125	. . . . 5 ⊢ (𝑤 ∈ (◡dom tpos 𝐹 ∪ {∅}) ↔ (𝑤 ∈ ◡dom tpos 𝐹 ∨ 𝑤 ∈ {∅}))
58	57	anbi1i 625	. . . 4 ⊢ ((𝑤 ∈ (◡dom tpos 𝐹 ∪ {∅}) ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ ((𝑤 ∈ ◡dom tpos 𝐹 ∨ 𝑤 ∈ {∅}) ∧ ∪ ◡{𝑤}tpos 𝐹𝑧))
59		brxp 5596	. . . . . . 7 ⊢ (𝑤(((V × V) ∪ {∅}) × V)𝑧 ↔ (𝑤 ∈ ((V × V) ∪ {∅}) ∧ 𝑧 ∈ V))
60	23, 59	mpbiran2 708	. . . . . 6 ⊢ (𝑤(((V × V) ∪ {∅}) × V)𝑧 ↔ 𝑤 ∈ ((V × V) ∪ {∅}))
61		elun 4125	. . . . . 6 ⊢ (𝑤 ∈ ((V × V) ∪ {∅}) ↔ (𝑤 ∈ (V × V) ∨ 𝑤 ∈ {∅}))
62	60, 61	bitri 277	. . . . 5 ⊢ (𝑤(((V × V) ∪ {∅}) × V)𝑧 ↔ (𝑤 ∈ (V × V) ∨ 𝑤 ∈ {∅}))
63	62	anbi2i 624	. . . 4 ⊢ ((𝑤𝐹𝑧 ∧ 𝑤(((V × V) ∪ {∅}) × V)𝑧) ↔ (𝑤𝐹𝑧 ∧ (𝑤 ∈ (V × V) ∨ 𝑤 ∈ {∅})))
64	56, 58, 63	3bitr4i 305	. . 3 ⊢ ((𝑤 ∈ (◡dom tpos 𝐹 ∪ {∅}) ∧ ∪ ◡{𝑤}tpos 𝐹𝑧) ↔ (𝑤𝐹𝑧 ∧ 𝑤(((V × V) ∪ {∅}) × V)𝑧))
65		brtpos2 7892	. . . 4 ⊢ (𝑧 ∈ V → (𝑤tpos tpos 𝐹𝑧 ↔ (𝑤 ∈ (◡dom tpos 𝐹 ∪ {∅}) ∧ ∪ ◡{𝑤}tpos 𝐹𝑧)))
66	65	elv 3500	. . 3 ⊢ (𝑤tpos tpos 𝐹𝑧 ↔ (𝑤 ∈ (◡dom tpos 𝐹 ∪ {∅}) ∧ ∪ ◡{𝑤}tpos 𝐹𝑧))
67		brin 5111	. . 3 ⊢ (𝑤(𝐹 ∩ (((V × V) ∪ {∅}) × V))𝑧 ↔ (𝑤𝐹𝑧 ∧ 𝑤(((V × V) ∪ {∅}) × V)𝑧))
68	64, 66, 67	3bitr4i 305	. 2 ⊢ (𝑤tpos tpos 𝐹𝑧 ↔ 𝑤(𝐹 ∩ (((V × V) ∪ {∅}) × V))𝑧)
69	1, 2, 68	eqbrriv 5659	1 ⊢ tpos tpos 𝐹 = (𝐹 ∩ (((V × V) ∪ {∅}) × V))

Syntax hints:   ↔ wb 208   ∧ wa 398   ∨ wo 843   = wceq 1533  ∃wex 1776   ∈ wcel 2110  Vcvv 3495   ∪ cun 3934   ∩ cin 3935   ⊆ wss 3936  ∅c0 4291  {csn 4561  ⟨cop 4567  ∪ cuni 4832   class class class wbr 5059   × cxp 5548  ^◡ccnv 5549  dom cdm 5550  Rel wrel 5555  tpos ctpos 7885

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 2156  ax-12 2172  ax-ext 2793  ax-sep 5196  ax-nul 5203  ax-pow 5259  ax-pr 5322  ax-un 7455

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  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-ne 3017  df-ral 3143  df-rex 3144  df-rab 3147  df-v 3497  df-sbc 3773  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-nul 4292  df-if 4468  df-pw 4541  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4833  df-br 5060  df-opab 5122  df-mpt 5140  df-id 5455  df-xp 5556  df-rel 5557  df-cnv 5558  df-co 5559  df-dm 5560  df-rn 5561  df-res 5562  df-ima 5563  df-iota 6309  df-fun 6352  df-fn 6353  df-fv 6358  df-tpos 7886

This theorem is referenced by:  tpostpos2  7907