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 49619
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 8203 . . 3 tpos (2nd𝐹) ∈ V
4 oppfvalg 49613 . . 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 693 . 2 ((1st𝐹) oppFunc tpos (2nd𝐹)) = if((Rel tpos (2nd𝐹) ∧ Rel dom tpos (2nd𝐹)), ⟨(1st𝐹), tpos tpos (2nd𝐹)⟩, ∅)
6 df-ov 7363 . . 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 49615 . . . . . . 7 (𝜑𝐹 ∈ (V × V))
11 1st2nd2 7974 . . . . . . 7 (𝐹 ∈ (V × V) → 𝐹 = ⟨(1st𝐹), (2nd𝐹)⟩)
1210, 11syl 17 . . . . . 6 (𝜑𝐹 = ⟨(1st𝐹), (2nd𝐹)⟩)
137, 8, 9, 12oppf1st2nd 49618 . . . . 5 (𝜑 → (𝐺 ∈ (V × V) ∧ ((1st𝐺) = (1st𝐹) ∧ (2nd𝐺) = tpos (2nd𝐹))))
14 eqopi 7971 . . . . 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 2791 . 2 (𝜑 → ((1st𝐹) oppFunc tpos (2nd𝐹)) = ( oppFunc ‘𝐺))
187, 8, 9, 12oppfrcl3 49617 . . . . 5 (𝜑 → (Rel (2nd𝐹) ∧ Rel dom (2nd𝐹)))
19 tpostpos2 8190 . . . . 5 ((Rel (2nd𝐹) ∧ Rel dom (2nd𝐹)) → tpos tpos (2nd𝐹) = (2nd𝐹))
2018, 19syl 17 . . . 4 (𝜑 → tpos tpos (2nd𝐹) = (2nd𝐹))
2120opeq2d 4824 . . 3 (𝜑 → ⟨(1st𝐹), tpos tpos (2nd𝐹)⟩ = ⟨(1st𝐹), (2nd𝐹)⟩)
22 0nelrel0 5684 . . . . . . 7 (Rel dom (2nd𝐹) → ¬ ∅ ∈ dom (2nd𝐹))
2318, 22simpl2im 503 . . . . . 6 (𝜑 → ¬ ∅ ∈ dom (2nd𝐹))
24 reldmtpos 8177 . . . . . 6 (Rel dom tpos (2nd𝐹) ↔ ¬ ∅ ∈ dom (2nd𝐹))
2523, 24sylibr 234 . . . . 5 (𝜑 → Rel dom tpos (2nd𝐹))
26 reltpos 8174 . . . . 5 Rel tpos (2nd𝐹)
2725, 26jctil 519 . . . 4 (𝜑 → (Rel tpos (2nd𝐹) ∧ Rel dom tpos (2nd𝐹)))
2827iftrued 4475 . . 3 (𝜑 → if((Rel tpos (2nd𝐹) ∧ Rel dom tpos (2nd𝐹)), ⟨(1st𝐹), tpos tpos (2nd𝐹)⟩, ∅) = ⟨(1st𝐹), tpos tpos (2nd𝐹)⟩)
2921, 28, 123eqtr4d 2782 . 2 (𝜑 → if((Rel tpos (2nd𝐹) ∧ Rel dom tpos (2nd𝐹)), ⟨(1st𝐹), tpos tpos (2nd𝐹)⟩, ∅) = 𝐹)
305, 17, 293eqtr3a 2796 1 (𝜑 → ( oppFunc ‘𝐺) = 𝐹)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395   = wceq 1542  wcel 2114  Vcvv 3430  c0 4274  ifcif 4467  cop 4574   × cxp 5622  dom cdm 5624  Rel wrel 5629  cfv 6492  (class class class)co 7360  1st c1st 7933  2nd c2nd 7934  tpos ctpos 8168   oppFunc coppf 49609
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-sep 5231  ax-nul 5241  ax-pow 5302  ax-pr 5370  ax-un 7682
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  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 7363  df-oprab 7364  df-mpo 7365  df-1st 7935  df-2nd 7936  df-tpos 8169  df-oppf 49610
This theorem is referenced by:  oppff1  49635  oppff1o  49636  natoppfb  49718  cmddu  50155
  Copyright terms: Public domain W3C validator