2oppf - Mathbox for Zhi Wang

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

Theorem 2oppf 49629

Description: The double opposite functor is the original functor. Remark 3.42 of [Adamek] p. 39. (Contributed by Zhi Wang, 14-Nov-2025.)

**Hypotheses**
Ref	Expression
oppfrcl.1	⊢ (𝜑 → 𝐺 ∈ 𝑅)
oppfrcl.2	⊢ Rel 𝑅
oppfrcl.3	⊢ 𝐺 = ( oppFunc ‘𝐹)

**Assertion**
Ref	Expression
2oppf	⊢ (𝜑 → ( oppFunc ‘𝐺) = 𝐹)

**Proof of Theorem 2oppf**
Step	Hyp	Ref	Expression
1		fvex 6847	. . 3 ⊢ (1^st ‘𝐹) ∈ V
2		fvex 6847	. . . 4 ⊢ (2^nd ‘𝐹) ∈ V
3	2	tposex 8207	. . 3 ⊢ tpos (2^nd ‘𝐹) ∈ V
4		oppfvalg 49623	. . 3 ⊢ (((1^st ‘𝐹) ∈ V ∧ tpos (2^nd ‘𝐹) ∈ V) → ((1^st ‘𝐹) oppFunc tpos (2^nd ‘𝐹)) = if((Rel tpos (2^nd ‘𝐹) ∧ Rel dom tpos (2^nd ‘𝐹)), ⟨(1^st ‘𝐹), tpos tpos (2^nd ‘𝐹)⟩, ∅))
5	1, 3, 4	mp2an 698	. 2 ⊢ ((1^st ‘𝐹) oppFunc tpos (2^nd ‘𝐹)) = if((Rel tpos (2^nd ‘𝐹) ∧ Rel dom tpos (2^nd ‘𝐹)), ⟨(1^st ‘𝐹), tpos tpos (2^nd ‘𝐹)⟩, ∅)
6		df-ov 7366	. . 3 ⊢ ((1^st ‘𝐹) oppFunc tpos (2^nd ‘𝐹)) = ( oppFunc ‘⟨(1^st ‘𝐹), tpos (2^nd ‘𝐹)⟩)
7		oppfrcl.1	. . . . . 6 ⊢ (𝜑 → 𝐺 ∈ 𝑅)
8		oppfrcl.2	. . . . . 6 ⊢ Rel 𝑅
9		oppfrcl.3	. . . . . 6 ⊢ 𝐺 = ( oppFunc ‘𝐹)
10	7, 8, 9	oppfrcl 49625	. . . . . . 7 ⊢ (𝜑 → 𝐹 ∈ (V × V))
11		1st2nd2 7977	. . . . . . 7 ⊢ (𝐹 ∈ (V × V) → 𝐹 = ⟨(1^st ‘𝐹), (2^nd ‘𝐹)⟩)
12	10, 11	syl 17	. . . . . 6 ⊢ (𝜑 → 𝐹 = ⟨(1^st ‘𝐹), (2^nd ‘𝐹)⟩)
13	7, 8, 9, 12	oppf1st2nd 49628	. . . . 5 ⊢ (𝜑 → (𝐺 ∈ (V × V) ∧ ((1^st ‘𝐺) = (1^st ‘𝐹) ∧ (2^nd ‘𝐺) = tpos (2^nd ‘𝐹))))
14		eqopi 7974	. . . . 5 ⊢ ((𝐺 ∈ (V × V) ∧ ((1^st ‘𝐺) = (1^st ‘𝐹) ∧ (2^nd ‘𝐺) = tpos (2^nd ‘𝐹))) → 𝐺 = ⟨(1^st ‘𝐹), tpos (2^nd ‘𝐹)⟩)
15	13, 14	syl 17	. . . 4 ⊢ (𝜑 → 𝐺 = ⟨(1^st ‘𝐹), tpos (2^nd ‘𝐹)⟩)
16	15	fveq2d 6838	. . 3 ⊢ (𝜑 → ( oppFunc ‘𝐺) = ( oppFunc ‘⟨(1^st ‘𝐹), tpos (2^nd ‘𝐹)⟩))
17	6, 16	eqtr4id 2794	. 2 ⊢ (𝜑 → ((1^st ‘𝐹) oppFunc tpos (2^nd ‘𝐹)) = ( oppFunc ‘𝐺))
18	7, 8, 9, 12	oppfrcl3 49627	. . . . 5 ⊢ (𝜑 → (Rel (2^nd ‘𝐹) ∧ Rel dom (2^nd ‘𝐹)))
19		tpostpos2 8194	. . . . 5 ⊢ ((Rel (2^nd ‘𝐹) ∧ Rel dom (2^nd ‘𝐹)) → tpos tpos (2^nd ‘𝐹) = (2^nd ‘𝐹))
20	18, 19	syl 17	. . . 4 ⊢ (𝜑 → tpos tpos (2^nd ‘𝐹) = (2^nd ‘𝐹))
21	20	opeq2d 4818	. . 3 ⊢ (𝜑 → ⟨(1^st ‘𝐹), tpos tpos (2^nd ‘𝐹)⟩ = ⟨(1^st ‘𝐹), (2^nd ‘𝐹)⟩)
22		0nelrel0 5685	. . . . . . 7 ⊢ (Rel dom (2^nd ‘𝐹) → ¬ ∅ ∈ dom (2^nd ‘𝐹))
23	18, 22	simpl2im 508	. . . . . 6 ⊢ (𝜑 → ¬ ∅ ∈ dom (2^nd ‘𝐹))
24		reldmtpos 8181	. . . . . 6 ⊢ (Rel dom tpos (2^nd ‘𝐹) ↔ ¬ ∅ ∈ dom (2^nd ‘𝐹))
25	23, 24	sylibr 235	. . . . 5 ⊢ (𝜑 → Rel dom tpos (2^nd ‘𝐹))
26		reltpos 8178	. . . . 5 ⊢ Rel tpos (2^nd ‘𝐹)
27	25, 26	jctil 524	. . . 4 ⊢ (𝜑 → (Rel tpos (2^nd ‘𝐹) ∧ Rel dom tpos (2^nd ‘𝐹)))
28	27	iftrued 4469	. . 3 ⊢ (𝜑 → if((Rel tpos (2^nd ‘𝐹) ∧ Rel dom tpos (2^nd ‘𝐹)), ⟨(1^st ‘𝐹), tpos tpos (2^nd ‘𝐹)⟩, ∅) = ⟨(1^st ‘𝐹), tpos tpos (2^nd ‘𝐹)⟩)
29	21, 28, 12	3eqtr4d 2785	. 2 ⊢ (𝜑 → if((Rel tpos (2^nd ‘𝐹) ∧ Rel dom tpos (2^nd ‘𝐹)), ⟨(1^st ‘𝐹), tpos tpos (2^nd ‘𝐹)⟩, ∅) = 𝐹)
30	5, 17, 29	3eqtr3a 2799	1 ⊢ (𝜑 → ( oppFunc ‘𝐺) = 𝐹)

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 396 = wceq 1547 ∈ wcel 2119 Vcvv 3432 ∅c0 4268 ifcif 4461 ⟨cop 4568 × cxp 5623 dom cdm 5625 Rel wrel 5630 ‘cfv 6492 (class class class)co 7363 1^st c1st 7936 2^nd c2nd 7937 tpos ctpos 8172 oppFunc coppf 49619

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1802 ax-4 1816 ax-5 1917 ax-6 1974 ax-7 2015 ax-8 2121 ax-9 2129 ax-10 2152 ax-11 2168 ax-12 2189 ax-ext 2712 ax-sep 5225 ax-nul 5235 ax-pow 5301 ax-pr 5369 ax-un 7685

This theorem depends on definitions: df-bi 208 df-an 397 df-or 854 df-3an 1094 df-tru 1550 df-fal 1560 df-ex 1787 df-nf 1791 df-sb 2074 df-mo 2543 df-eu 2573 df-clab 2719 df-cleq 2732 df-clel 2815 df-nfc 2889 df-ne 2936 df-ral 3055 df-rex 3065 df-rab 3393 df-v 3434 df-sbc 3731 df-csb 3839 df-dif 3893 df-un 3895 df-in 3897 df-ss 3907 df-nul 4269 df-if 4462 df-pw 4538 df-sn 4563 df-pr 4565 df-op 4569 df-uni 4846 df-iun 4930 df-br 5080 df-opab 5142 df-mpt 5161 df-id 5520 df-xp 5631 df-rel 5632 df-cnv 5633 df-co 5634 df-dm 5635 df-rn 5636 df-res 5637 df-ima 5638 df-iota 6448 df-fun 6494 df-fn 6495 df-f 6496 df-fv 6500 df-ov 7366 df-oprab 7367 df-mpo 7368 df-1st 7938 df-2nd 7939 df-tpos 8173 df-oppf 49620

This theorem is referenced by: oppff1 49645 oppff1o 49646 natoppfb 49728 cmddu 50165

W3C validator