| Mathbox for Zhi Wang |
< Previous
Next >
Nearby theorems |
||
| Mirrors > Home > MPE Home > Th. List > Mathboxes > oppf1st2nd | Structured version Visualization version GIF version | ||
| Description: Rewrite the opposite functor into its components (eqopi 8020). (Contributed by Zhi Wang, 14-Nov-2025.) |
| Ref | Expression |
|---|---|
| oppfrcl.1 | ⊢ (𝜑 → 𝐺 ∈ 𝑅) |
| oppfrcl.2 | ⊢ Rel 𝑅 |
| oppfrcl.3 | ⊢ 𝐺 = ( oppFunc ‘𝐹) |
| oppfrcl2.4 | ⊢ (𝜑 → 𝐹 = 〈𝐴, 𝐵〉) |
| Ref | Expression |
|---|---|
| oppf1st2nd | ⊢ (𝜑 → (𝐺 ∈ (V × V) ∧ ((1st ‘𝐺) = 𝐴 ∧ (2nd ‘𝐺) = tpos 𝐵))) |
| Step | Hyp | Ref | Expression |
|---|---|---|---|
| 1 | oppfrcl2.4 | . . . . . . 7 ⊢ (𝜑 → 𝐹 = 〈𝐴, 𝐵〉) | |
| 2 | 1 | fveq2d 6885 | . . . . . 6 ⊢ (𝜑 → ( oppFunc ‘𝐹) = ( oppFunc ‘〈𝐴, 𝐵〉)) |
| 3 | oppfrcl.3 | . . . . . 6 ⊢ 𝐺 = ( oppFunc ‘𝐹) | |
| 4 | df-ov 7415 | . . . . . 6 ⊢ (𝐴 oppFunc 𝐵) = ( oppFunc ‘〈𝐴, 𝐵〉) | |
| 5 | 2, 3, 4 | 3eqtr4g 2822 | . . . . 5 ⊢ (𝜑 → 𝐺 = (𝐴 oppFunc 𝐵)) |
| 6 | oppfrcl.1 | . . . . . . 7 ⊢ (𝜑 → 𝐺 ∈ 𝑅) | |
| 7 | oppfrcl.2 | . . . . . . 7 ⊢ Rel 𝑅 | |
| 8 | 6, 7, 3, 1 | oppfrcl2 49935 | . . . . . 6 ⊢ (𝜑 → (𝐴 ∈ V ∧ 𝐵 ∈ V)) |
| 9 | oppfvalg 49932 | . . . . . 6 ⊢ ((𝐴 ∈ V ∧ 𝐵 ∈ V) → (𝐴 oppFunc 𝐵) = if((Rel 𝐵 ∧ Rel dom 𝐵), 〈𝐴, tpos 𝐵〉, ∅)) | |
| 10 | 8, 9 | syl 18 | . . . . 5 ⊢ (𝜑 → (𝐴 oppFunc 𝐵) = if((Rel 𝐵 ∧ Rel dom 𝐵), 〈𝐴, tpos 𝐵〉, ∅)) |
| 11 | 5, 10 | eqtrd 2797 | . . . 4 ⊢ (𝜑 → 𝐺 = if((Rel 𝐵 ∧ Rel dom 𝐵), 〈𝐴, tpos 𝐵〉, ∅)) |
| 12 | 6, 7, 3, 1 | oppfrcl3 49936 | . . . . 5 ⊢ (𝜑 → (Rel 𝐵 ∧ Rel dom 𝐵)) |
| 13 | 12 | iftrued 4494 | . . . 4 ⊢ (𝜑 → if((Rel 𝐵 ∧ Rel dom 𝐵), 〈𝐴, tpos 𝐵〉, ∅) = 〈𝐴, tpos 𝐵〉) |
| 14 | 11, 13 | eqtrd 2797 | . . 3 ⊢ (𝜑 → 𝐺 = 〈𝐴, tpos 𝐵〉) |
| 15 | 8 | simpld 499 | . . . 4 ⊢ (𝜑 → 𝐴 ∈ V) |
| 16 | tposexg 8234 | . . . . 5 ⊢ (𝐵 ∈ V → tpos 𝐵 ∈ V) | |
| 17 | 8, 16 | simpl2im 512 | . . . 4 ⊢ (𝜑 → tpos 𝐵 ∈ V) |
| 18 | 15, 17 | opelxpd 5699 | . . 3 ⊢ (𝜑 → 〈𝐴, tpos 𝐵〉 ∈ (V × V)) |
| 19 | 14, 18 | eqeltrd 2862 | . 2 ⊢ (𝜑 → 𝐺 ∈ (V × V)) |
| 20 | 14 | fveq2d 6885 | . . 3 ⊢ (𝜑 → (1st ‘𝐺) = (1st ‘〈𝐴, tpos 𝐵〉)) |
| 21 | op1stg 7996 | . . . 4 ⊢ ((𝐴 ∈ V ∧ tpos 𝐵 ∈ V) → (1st ‘〈𝐴, tpos 𝐵〉) = 𝐴) | |
| 22 | 15, 17, 21 | syl2anc 595 | . . 3 ⊢ (𝜑 → (1st ‘〈𝐴, tpos 𝐵〉) = 𝐴) |
| 23 | 20, 22 | eqtrd 2797 | . 2 ⊢ (𝜑 → (1st ‘𝐺) = 𝐴) |
| 24 | 14 | fveq2d 6885 | . . 3 ⊢ (𝜑 → (2nd ‘𝐺) = (2nd ‘〈𝐴, tpos 𝐵〉)) |
| 25 | op2ndg 7997 | . . . 4 ⊢ ((𝐴 ∈ V ∧ tpos 𝐵 ∈ V) → (2nd ‘〈𝐴, tpos 𝐵〉) = tpos 𝐵) | |
| 26 | 15, 17, 25 | syl2anc 595 | . . 3 ⊢ (𝜑 → (2nd ‘〈𝐴, tpos 𝐵〉) = tpos 𝐵) |
| 27 | 24, 26 | eqtrd 2797 | . 2 ⊢ (𝜑 → (2nd ‘𝐺) = tpos 𝐵) |
| 28 | 19, 23, 27 | jca32 524 | 1 ⊢ (𝜑 → (𝐺 ∈ (V × V) ∧ ((1st ‘𝐺) = 𝐴 ∧ (2nd ‘𝐺) = tpos 𝐵))) |
| Colors of variables: wff setvar class |
| This proof depends on syntax axioms: → wi 4 ∧ wa 400 = wceq 1569 ∈ wcel 2142 Vcvv 3454 ∅c0 4285 ifcif 4486 〈cop 4594 × cxp 5658 dom cdm 5660 Rel wrel 5665 ‘cfv 6536 (class class class)co 7412 1st c1st 7982 2nd c2nd 7983 tpos ctpos 8219 oppFunc coppf 49928 |
| This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1824 ax-4 1838 ax-5 1939 ax-6 1996 ax-7 2037 ax-8 2144 ax-9 2152 ax-10 2175 ax-11 2191 ax-12 2212 ax-ext 2734 ax-sep 5256 ax-nul 5268 ax-pow 5335 ax-pr 5403 ax-un 7734 |
| This proof depends on definitions: df-bi 210 df-an 401 df-or 861 df-3an 1104 df-tru 1572 df-fal 1582 df-ex 1809 df-nf 1813 df-sb 2096 df-mo 2566 df-eu 2596 df-clab 2741 df-cleq 2754 df-clel 2837 df-nfc 2911 df-ne 2958 df-ral 3079 df-rex 3089 df-rab 3416 df-v 3456 df-sbc 3744 df-csb 3853 df-dif 3907 df-un 3909 df-in 3911 df-ss 3921 df-nul 4286 df-if 4487 df-pw 4563 df-sn 4589 df-pr 4591 df-op 4595 df-uni 4872 df-iun 4957 df-br 5109 df-opab 5173 df-mpt 5192 df-id 5555 df-xp 5666 df-rel 5667 df-cnv 5668 df-co 5669 df-dm 5670 df-rn 5671 df-res 5672 df-ima 5673 df-iota 6492 df-fun 6538 df-fn 6539 df-f 6540 df-fv 6544 df-ov 7415 df-oprab 7416 df-mpo 7417 df-1st 7984 df-2nd 7985 df-tpos 8220 df-oppf 49929 |
| This theorem is used by: 2oppf 49938 funcoppc4 49950 |
| Copyright terms: Public domain | W3C validator |