tposideq - Mathbox for Zhi Wang

	Mathbox for Zhi Wang		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > tposideq		Structured version Visualization version GIF version

Theorem tposideq 49133

Description: Two ways of expressing the swap function. (Contributed by Zhi Wang, 6-Oct-2025.)

**Assertion**
Ref	Expression
tposideq	⊢ (Rel 𝑅 → (tpos I ↾ 𝑅) = (𝑥 ∈ 𝑅 ↦ ∪ ^◡{𝑥}))

Distinct variable group: 𝑥,𝑅

Proof of Theorem tposideq Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		tposres 49127	. 2 ⊢ (Rel 𝑅 → (tpos I ↾ 𝑅) = tpos ( I ↾ ^◡𝑅))
2		relcnv 6063	. . . . 5 ⊢ Rel ^◡𝑅
3		fnresi 6621	. . . . 5 ⊢ ( I ↾ ^◡𝑅) Fn ^◡𝑅
4		tposfn2 8190	. . . . 5 ⊢ (Rel ^◡𝑅 → (( I ↾ ^◡𝑅) Fn ^◡𝑅 → tpos ( I ↾ ^◡𝑅) Fn ^◡^◡𝑅))
5	2, 3, 4	mp2 9	. . . 4 ⊢ tpos ( I ↾ ^◡𝑅) Fn ^◡^◡𝑅
6		dfrel2 6147	. . . . . 6 ⊢ (Rel 𝑅 ↔ ^◡^◡𝑅 = 𝑅)
7	6	biimpi 216	. . . . 5 ⊢ (Rel 𝑅 → ^◡^◡𝑅 = 𝑅)
8	7	fneq2d 6586	. . . 4 ⊢ (Rel 𝑅 → (tpos ( I ↾ ^◡𝑅) Fn ^◡^◡𝑅 ↔ tpos ( I ↾ ^◡𝑅) Fn 𝑅))
9	5, 8	mpbii 233	. . 3 ⊢ (Rel 𝑅 → tpos ( I ↾ ^◡𝑅) Fn 𝑅)
10		vsnex 5379	. . . . . . 7 ⊢ {𝑥} ∈ V
11	10	cnvex 7867	. . . . . 6 ⊢ ^◡{𝑥} ∈ V
12	11	uniex 7686	. . . . 5 ⊢ ∪ ^◡{𝑥} ∈ V
13		eqid 2736	. . . . 5 ⊢ (𝑥 ∈ 𝑅 ↦ ∪ ^◡{𝑥}) = (𝑥 ∈ 𝑅 ↦ ∪ ^◡{𝑥})
14	12, 13	fnmpti 6635	. . . 4 ⊢ (𝑥 ∈ 𝑅 ↦ ∪ ^◡{𝑥}) Fn 𝑅
15	14	a1i 11	. . 3 ⊢ (Rel 𝑅 → (𝑥 ∈ 𝑅 ↦ ∪ ^◡{𝑥}) Fn 𝑅)
16		1st2nd 7983	. . . . 5 ⊢ ((Rel 𝑅 ∧ 𝑦 ∈ 𝑅) → 𝑦 = ⟨(1^st ‘𝑦), (2^nd ‘𝑦)⟩)
17		1st2ndb 7973	. . . . . 6 ⊢ (𝑦 ∈ (V × V) ↔ 𝑦 = ⟨(1^st ‘𝑦), (2^nd ‘𝑦)⟩)
18	17	biimpri 228	. . . . 5 ⊢ (𝑦 = ⟨(1^st ‘𝑦), (2^nd ‘𝑦)⟩ → 𝑦 ∈ (V × V))
19		2nd1st 7982	. . . . 5 ⊢ (𝑦 ∈ (V × V) → ∪ ^◡{𝑦} = ⟨(2^nd ‘𝑦), (1^st ‘𝑦)⟩)
20	16, 18, 19	3syl 18	. . . 4 ⊢ ((Rel 𝑅 ∧ 𝑦 ∈ 𝑅) → ∪ ^◡{𝑦} = ⟨(2^nd ‘𝑦), (1^st ‘𝑦)⟩)
21		sneq 4590	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → {𝑥} = {𝑦})
22	21	cnveqd 5824	. . . . . . 7 ⊢ (𝑥 = 𝑦 → ^◡{𝑥} = ^◡{𝑦})
23	22	unieqd 4876	. . . . . 6 ⊢ (𝑥 = 𝑦 → ∪ ^◡{𝑥} = ∪ ^◡{𝑦})
24	23, 13, 12	fvmpt3i 6946	. . . . 5 ⊢ (𝑦 ∈ 𝑅 → ((𝑥 ∈ 𝑅 ↦ ∪ ^◡{𝑥})‘𝑦) = ∪ ^◡{𝑦})
25	24	adantl 481	. . . 4 ⊢ ((Rel 𝑅 ∧ 𝑦 ∈ 𝑅) → ((𝑥 ∈ 𝑅 ↦ ∪ ^◡{𝑥})‘𝑦) = ∪ ^◡{𝑦})
26	16	fveq2d 6838	. . . . 5 ⊢ ((Rel 𝑅 ∧ 𝑦 ∈ 𝑅) → (tpos ( I ↾ ^◡𝑅)‘𝑦) = (tpos ( I ↾ ^◡𝑅)‘⟨(1^st ‘𝑦), (2^nd ‘𝑦)⟩))
27		ovtpos 8183	. . . . . . 7 ⊢ ((1^st ‘𝑦)tpos ( I ↾ ^◡𝑅)(2^nd ‘𝑦)) = ((2^nd ‘𝑦)( I ↾ ^◡𝑅)(1^st ‘𝑦))
28		df-ov 7361	. . . . . . 7 ⊢ ((1^st ‘𝑦)tpos ( I ↾ ^◡𝑅)(2^nd ‘𝑦)) = (tpos ( I ↾ ^◡𝑅)‘⟨(1^st ‘𝑦), (2^nd ‘𝑦)⟩)
29		df-ov 7361	. . . . . . 7 ⊢ ((2^nd ‘𝑦)( I ↾ ^◡𝑅)(1^st ‘𝑦)) = (( I ↾ ^◡𝑅)‘⟨(2^nd ‘𝑦), (1^st ‘𝑦)⟩)
30	27, 28, 29	3eqtr3i 2767	. . . . . 6 ⊢ (tpos ( I ↾ ^◡𝑅)‘⟨(1^st ‘𝑦), (2^nd ‘𝑦)⟩) = (( I ↾ ^◡𝑅)‘⟨(2^nd ‘𝑦), (1^st ‘𝑦)⟩)
31	30	a1i 11	. . . . 5 ⊢ ((Rel 𝑅 ∧ 𝑦 ∈ 𝑅) → (tpos ( I ↾ ^◡𝑅)‘⟨(1^st ‘𝑦), (2^nd ‘𝑦)⟩) = (( I ↾ ^◡𝑅)‘⟨(2^nd ‘𝑦), (1^st ‘𝑦)⟩))
32		simpr 484	. . . . . . 7 ⊢ ((Rel 𝑅 ∧ 𝑦 ∈ 𝑅) → 𝑦 ∈ 𝑅)
33	16, 32	eqeltrrd 2837	. . . . . 6 ⊢ ((Rel 𝑅 ∧ 𝑦 ∈ 𝑅) → ⟨(1^st ‘𝑦), (2^nd ‘𝑦)⟩ ∈ 𝑅)
34		fvex 6847	. . . . . . . 8 ⊢ (2^nd ‘𝑦) ∈ V
35		fvex 6847	. . . . . . . 8 ⊢ (1^st ‘𝑦) ∈ V
36	34, 35	opelcnv 5830	. . . . . . 7 ⊢ (⟨(2^nd ‘𝑦), (1^st ‘𝑦)⟩ ∈ ^◡𝑅 ↔ ⟨(1^st ‘𝑦), (2^nd ‘𝑦)⟩ ∈ 𝑅)
37	36	biimpri 228	. . . . . 6 ⊢ (⟨(1^st ‘𝑦), (2^nd ‘𝑦)⟩ ∈ 𝑅 → ⟨(2^nd ‘𝑦), (1^st ‘𝑦)⟩ ∈ ^◡𝑅)
38		fvresi 7119	. . . . . 6 ⊢ (⟨(2^nd ‘𝑦), (1^st ‘𝑦)⟩ ∈ ^◡𝑅 → (( I ↾ ^◡𝑅)‘⟨(2^nd ‘𝑦), (1^st ‘𝑦)⟩) = ⟨(2^nd ‘𝑦), (1^st ‘𝑦)⟩)
39	33, 37, 38	3syl 18	. . . . 5 ⊢ ((Rel 𝑅 ∧ 𝑦 ∈ 𝑅) → (( I ↾ ^◡𝑅)‘⟨(2^nd ‘𝑦), (1^st ‘𝑦)⟩) = ⟨(2^nd ‘𝑦), (1^st ‘𝑦)⟩)
40	26, 31, 39	3eqtrd 2775	. . . 4 ⊢ ((Rel 𝑅 ∧ 𝑦 ∈ 𝑅) → (tpos ( I ↾ ^◡𝑅)‘𝑦) = ⟨(2^nd ‘𝑦), (1^st ‘𝑦)⟩)
41	20, 25, 40	3eqtr4rd 2782	. . 3 ⊢ ((Rel 𝑅 ∧ 𝑦 ∈ 𝑅) → (tpos ( I ↾ ^◡𝑅)‘𝑦) = ((𝑥 ∈ 𝑅 ↦ ∪ ^◡{𝑥})‘𝑦))
42	9, 15, 41	eqfnfvd 6979	. 2 ⊢ (Rel 𝑅 → tpos ( I ↾ ^◡𝑅) = (𝑥 ∈ 𝑅 ↦ ∪ ^◡{𝑥}))
43	1, 42	eqtrd 2771	1 ⊢ (Rel 𝑅 → (tpos I ↾ 𝑅) = (𝑥 ∈ 𝑅 ↦ ∪ ^◡{𝑥}))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1541 ∈ wcel 2113 Vcvv 3440 {csn 4580 ⟨cop 4586 ∪ cuni 4863 ↦ cmpt 5179 I cid 5518 × cxp 5622 ^◡ccnv 5623 ↾ cres 5626 Rel wrel 5629 Fn wfn 6487 ‘cfv 6492 (class class class)co 7358 1^st c1st 7931 2^nd c2nd 7932 tpos ctpos 8167

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1968 ax-7 2009 ax-8 2115 ax-9 2123 ax-10 2146 ax-11 2162 ax-12 2184 ax-ext 2708 ax-sep 5241 ax-nul 5251 ax-pow 5310 ax-pr 5377 ax-un 7680

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3an 1088 df-tru 1544 df-fal 1554 df-ex 1781 df-nf 1785 df-sb 2068 df-mo 2539 df-eu 2569 df-clab 2715 df-cleq 2728 df-clel 2811 df-nfc 2885 df-ne 2933 df-ral 3052 df-rex 3061 df-reu 3351 df-rab 3400 df-v 3442 df-sbc 3741 df-csb 3850 df-dif 3904 df-un 3906 df-in 3908 df-ss 3918 df-nul 4286 df-if 4480 df-pw 4556 df-sn 4581 df-pr 4583 df-op 4587 df-uni 4864 df-br 5099 df-opab 5161 df-mpt 5180 df-id 5519 df-xp 5630 df-rel 5631 df-cnv 5632 df-co 5633 df-dm 5634 df-rn 5635 df-res 5636 df-ima 5637 df-iota 6448 df-fun 6494 df-fn 6495 df-f 6496 df-f1 6497 df-fo 6498 df-f1o 6499 df-fv 6500 df-ov 7361 df-1st 7933 df-2nd 7934 df-tpos 8168

This theorem is referenced by: tposideq2 49134

W3C validator