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

Theorem 2oppf 49373
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
StepHypRef Expression
1 fvex 6847 . . 3 (1st𝐹) ∈ V
2 fvex 6847 . . . 4 (2nd𝐹) ∈ V
32tposex 8202 . . 3 tpos (2nd𝐹) ∈ V
4 oppfvalg 49367 . . 3 (((1st𝐹) ∈ V ∧ tpos (2nd𝐹) ∈ V) → ((1st𝐹) oppFunc tpos (2nd𝐹)) = if((Rel tpos (2nd𝐹) ∧ Rel dom tpos (2nd𝐹)), ⟨(1st𝐹), tpos tpos (2nd𝐹)⟩, ∅))
51, 3, 4mp2an 692 . 2 ((1st𝐹) oppFunc tpos (2nd𝐹)) = if((Rel tpos (2nd𝐹) ∧ Rel dom tpos (2nd𝐹)), ⟨(1st𝐹), tpos tpos (2nd𝐹)⟩, ∅)
6 df-ov 7361 . . 3 ((1st𝐹) oppFunc tpos (2nd𝐹)) = ( oppFunc ‘⟨(1st𝐹), tpos (2nd𝐹)⟩)
7 oppfrcl.1 . . . . . 6 (𝜑𝐺𝑅)
8 oppfrcl.2 . . . . . 6 Rel 𝑅
9 oppfrcl.3 . . . . . 6 𝐺 = ( oppFunc ‘𝐹)
107, 8, 9oppfrcl 49369 . . . . . . 7 (𝜑𝐹 ∈ (V × V))
11 1st2nd2 7972 . . . . . . 7 (𝐹 ∈ (V × V) → 𝐹 = ⟨(1st𝐹), (2nd𝐹)⟩)
1210, 11syl 17 . . . . . 6 (𝜑𝐹 = ⟨(1st𝐹), (2nd𝐹)⟩)
137, 8, 9, 12oppf1st2nd 49372 . . . . 5 (𝜑 → (𝐺 ∈ (V × V) ∧ ((1st𝐺) = (1st𝐹) ∧ (2nd𝐺) = tpos (2nd𝐹))))
14 eqopi 7969 . . . . 5 ((𝐺 ∈ (V × V) ∧ ((1st𝐺) = (1st𝐹) ∧ (2nd𝐺) = tpos (2nd𝐹))) → 𝐺 = ⟨(1st𝐹), tpos (2nd𝐹)⟩)
1513, 14syl 17 . . . 4 (𝜑𝐺 = ⟨(1st𝐹), tpos (2nd𝐹)⟩)
1615fveq2d 6838 . . 3 (𝜑 → ( oppFunc ‘𝐺) = ( oppFunc ‘⟨(1st𝐹), tpos (2nd𝐹)⟩))
176, 16eqtr4id 2790 . 2 (𝜑 → ((1st𝐹) oppFunc tpos (2nd𝐹)) = ( oppFunc ‘𝐺))
187, 8, 9, 12oppfrcl3 49371 . . . . 5 (𝜑 → (Rel (2nd𝐹) ∧ Rel dom (2nd𝐹)))
19 tpostpos2 8189 . . . . 5 ((Rel (2nd𝐹) ∧ Rel dom (2nd𝐹)) → tpos tpos (2nd𝐹) = (2nd𝐹))
2018, 19syl 17 . . . 4 (𝜑 → tpos tpos (2nd𝐹) = (2nd𝐹))
2120opeq2d 4836 . . 3 (𝜑 → ⟨(1st𝐹), tpos tpos (2nd𝐹)⟩ = ⟨(1st𝐹), (2nd𝐹)⟩)
22 0nelrel0 5684 . . . . . . 7 (Rel dom (2nd𝐹) → ¬ ∅ ∈ dom (2nd𝐹))
2318, 22simpl2im 503 . . . . . 6 (𝜑 → ¬ ∅ ∈ dom (2nd𝐹))
24 reldmtpos 8176 . . . . . 6 (Rel dom tpos (2nd𝐹) ↔ ¬ ∅ ∈ dom (2nd𝐹))
2523, 24sylibr 234 . . . . 5 (𝜑 → Rel dom tpos (2nd𝐹))
26 reltpos 8173 . . . . 5 Rel tpos (2nd𝐹)
2725, 26jctil 519 . . . 4 (𝜑 → (Rel tpos (2nd𝐹) ∧ Rel dom tpos (2nd𝐹)))
2827iftrued 4487 . . 3 (𝜑 → if((Rel tpos (2nd𝐹) ∧ Rel dom tpos (2nd𝐹)), ⟨(1st𝐹), tpos tpos (2nd𝐹)⟩, ∅) = ⟨(1st𝐹), tpos tpos (2nd𝐹)⟩)
2921, 28, 123eqtr4d 2781 . 2 (𝜑 → if((Rel tpos (2nd𝐹) ∧ Rel dom tpos (2nd𝐹)), ⟨(1st𝐹), tpos tpos (2nd𝐹)⟩, ∅) = 𝐹)
305, 17, 293eqtr3a 2795 1 (𝜑 → ( oppFunc ‘𝐺) = 𝐹)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395   = wceq 1541  wcel 2113  Vcvv 3440  c0 4285  ifcif 4479  cop 4586   × cxp 5622  dom cdm 5624  Rel wrel 5629  cfv 6492  (class class class)co 7358  1st c1st 7931  2nd c2nd 7932  tpos ctpos 8167   oppFunc coppf 49363
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-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-iun 4948  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-fv 6500  df-ov 7361  df-oprab 7362  df-mpo 7363  df-1st 7933  df-2nd 7934  df-tpos 8168  df-oppf 49364
This theorem is referenced by:  oppff1  49389  oppff1o  49390  natoppfb  49472  cmddu  49909
  Copyright terms: Public domain W3C validator