MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  funcf2 Structured version   Visualization version   GIF version

Theorem funcf2 17932
Description: The morphism part of a functor is a function on homsets. (Contributed by Mario Carneiro, 2-Jan-2017.)
Hypotheses
Ref Expression
funcixp.b 𝐵 = (Base‘𝐷)
funcixp.h 𝐻 = (Hom ‘𝐷)
funcixp.j 𝐽 = (Hom ‘𝐸)
funcixp.f (𝜑𝐹(𝐷 Func 𝐸)𝐺)
funcf2.x (𝜑𝑋𝐵)
funcf2.y (𝜑𝑌𝐵)
Assertion
Ref Expression
funcf2 (𝜑 → (𝑋𝐺𝑌):(𝑋𝐻𝑌)⟶((𝐹𝑋)𝐽(𝐹𝑌)))

Proof of Theorem funcf2
Dummy variable 𝑧 is distinct from all other variables.
StepHypRef Expression
1 df-ov 7451 . . . 4 (𝑋𝐺𝑌) = (𝐺‘⟨𝑋, 𝑌⟩)
2 funcixp.b . . . . . 6 𝐵 = (Base‘𝐷)
3 funcixp.h . . . . . 6 𝐻 = (Hom ‘𝐷)
4 funcixp.j . . . . . 6 𝐽 = (Hom ‘𝐸)
5 funcixp.f . . . . . 6 (𝜑𝐹(𝐷 Func 𝐸)𝐺)
62, 3, 4, 5funcixp 17931 . . . . 5 (𝜑𝐺X𝑧 ∈ (𝐵 × 𝐵)(((𝐹‘(1st𝑧))𝐽(𝐹‘(2nd𝑧))) ↑m (𝐻𝑧)))
7 funcf2.x . . . . . 6 (𝜑𝑋𝐵)
8 funcf2.y . . . . . 6 (𝜑𝑌𝐵)
97, 8opelxpd 5739 . . . . 5 (𝜑 → ⟨𝑋, 𝑌⟩ ∈ (𝐵 × 𝐵))
10 2fveq3 6925 . . . . . . . 8 (𝑧 = ⟨𝑋, 𝑌⟩ → (𝐹‘(1st𝑧)) = (𝐹‘(1st ‘⟨𝑋, 𝑌⟩)))
11 2fveq3 6925 . . . . . . . 8 (𝑧 = ⟨𝑋, 𝑌⟩ → (𝐹‘(2nd𝑧)) = (𝐹‘(2nd ‘⟨𝑋, 𝑌⟩)))
1210, 11oveq12d 7466 . . . . . . 7 (𝑧 = ⟨𝑋, 𝑌⟩ → ((𝐹‘(1st𝑧))𝐽(𝐹‘(2nd𝑧))) = ((𝐹‘(1st ‘⟨𝑋, 𝑌⟩))𝐽(𝐹‘(2nd ‘⟨𝑋, 𝑌⟩))))
13 fveq2 6920 . . . . . . . 8 (𝑧 = ⟨𝑋, 𝑌⟩ → (𝐻𝑧) = (𝐻‘⟨𝑋, 𝑌⟩))
14 df-ov 7451 . . . . . . . 8 (𝑋𝐻𝑌) = (𝐻‘⟨𝑋, 𝑌⟩)
1513, 14eqtr4di 2798 . . . . . . 7 (𝑧 = ⟨𝑋, 𝑌⟩ → (𝐻𝑧) = (𝑋𝐻𝑌))
1612, 15oveq12d 7466 . . . . . 6 (𝑧 = ⟨𝑋, 𝑌⟩ → (((𝐹‘(1st𝑧))𝐽(𝐹‘(2nd𝑧))) ↑m (𝐻𝑧)) = (((𝐹‘(1st ‘⟨𝑋, 𝑌⟩))𝐽(𝐹‘(2nd ‘⟨𝑋, 𝑌⟩))) ↑m (𝑋𝐻𝑌)))
1716fvixp 8960 . . . . 5 ((𝐺X𝑧 ∈ (𝐵 × 𝐵)(((𝐹‘(1st𝑧))𝐽(𝐹‘(2nd𝑧))) ↑m (𝐻𝑧)) ∧ ⟨𝑋, 𝑌⟩ ∈ (𝐵 × 𝐵)) → (𝐺‘⟨𝑋, 𝑌⟩) ∈ (((𝐹‘(1st ‘⟨𝑋, 𝑌⟩))𝐽(𝐹‘(2nd ‘⟨𝑋, 𝑌⟩))) ↑m (𝑋𝐻𝑌)))
186, 9, 17syl2anc 583 . . . 4 (𝜑 → (𝐺‘⟨𝑋, 𝑌⟩) ∈ (((𝐹‘(1st ‘⟨𝑋, 𝑌⟩))𝐽(𝐹‘(2nd ‘⟨𝑋, 𝑌⟩))) ↑m (𝑋𝐻𝑌)))
191, 18eqeltrid 2848 . . 3 (𝜑 → (𝑋𝐺𝑌) ∈ (((𝐹‘(1st ‘⟨𝑋, 𝑌⟩))𝐽(𝐹‘(2nd ‘⟨𝑋, 𝑌⟩))) ↑m (𝑋𝐻𝑌)))
20 op1stg 8042 . . . . . . 7 ((𝑋𝐵𝑌𝐵) → (1st ‘⟨𝑋, 𝑌⟩) = 𝑋)
2120fveq2d 6924 . . . . . 6 ((𝑋𝐵𝑌𝐵) → (𝐹‘(1st ‘⟨𝑋, 𝑌⟩)) = (𝐹𝑋))
22 op2ndg 8043 . . . . . . 7 ((𝑋𝐵𝑌𝐵) → (2nd ‘⟨𝑋, 𝑌⟩) = 𝑌)
2322fveq2d 6924 . . . . . 6 ((𝑋𝐵𝑌𝐵) → (𝐹‘(2nd ‘⟨𝑋, 𝑌⟩)) = (𝐹𝑌))
2421, 23oveq12d 7466 . . . . 5 ((𝑋𝐵𝑌𝐵) → ((𝐹‘(1st ‘⟨𝑋, 𝑌⟩))𝐽(𝐹‘(2nd ‘⟨𝑋, 𝑌⟩))) = ((𝐹𝑋)𝐽(𝐹𝑌)))
257, 8, 24syl2anc 583 . . . 4 (𝜑 → ((𝐹‘(1st ‘⟨𝑋, 𝑌⟩))𝐽(𝐹‘(2nd ‘⟨𝑋, 𝑌⟩))) = ((𝐹𝑋)𝐽(𝐹𝑌)))
2625oveq1d 7463 . . 3 (𝜑 → (((𝐹‘(1st ‘⟨𝑋, 𝑌⟩))𝐽(𝐹‘(2nd ‘⟨𝑋, 𝑌⟩))) ↑m (𝑋𝐻𝑌)) = (((𝐹𝑋)𝐽(𝐹𝑌)) ↑m (𝑋𝐻𝑌)))
2719, 26eleqtrd 2846 . 2 (𝜑 → (𝑋𝐺𝑌) ∈ (((𝐹𝑋)𝐽(𝐹𝑌)) ↑m (𝑋𝐻𝑌)))
28 elmapi 8907 . 2 ((𝑋𝐺𝑌) ∈ (((𝐹𝑋)𝐽(𝐹𝑌)) ↑m (𝑋𝐻𝑌)) → (𝑋𝐺𝑌):(𝑋𝐻𝑌)⟶((𝐹𝑋)𝐽(𝐹𝑌)))
2927, 28syl 17 1 (𝜑 → (𝑋𝐺𝑌):(𝑋𝐻𝑌)⟶((𝐹𝑋)𝐽(𝐹𝑌)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1537  wcel 2108  cop 4654   class class class wbr 5166   × cxp 5698  wf 6569  cfv 6573  (class class class)co 7448  1st c1st 8028  2nd c2nd 8029  m cmap 8884  Xcixp 8955  Basecbs 17258  Hom chom 17322   Func cfunc 17918
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2158  ax-12 2178  ax-ext 2711  ax-rep 5303  ax-sep 5317  ax-nul 5324  ax-pow 5383  ax-pr 5447  ax-un 7770
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2543  df-eu 2572  df-clab 2718  df-cleq 2732  df-clel 2819  df-nfc 2895  df-ne 2947  df-ral 3068  df-rex 3077  df-rab 3444  df-v 3490  df-sbc 3805  df-csb 3922  df-dif 3979  df-un 3981  df-in 3983  df-ss 3993  df-nul 4353  df-if 4549  df-pw 4624  df-sn 4649  df-pr 4651  df-op 4655  df-uni 4932  df-iun 5017  df-br 5167  df-opab 5229  df-mpt 5250  df-id 5593  df-xp 5706  df-rel 5707  df-cnv 5708  df-co 5709  df-dm 5710  df-rn 5711  df-res 5712  df-ima 5713  df-iota 6525  df-fun 6575  df-fn 6576  df-f 6577  df-fv 6581  df-ov 7451  df-oprab 7452  df-mpo 7453  df-1st 8030  df-2nd 8031  df-map 8886  df-ixp 8956  df-func 17922
This theorem is referenced by:  funcsect  17936  funcoppc  17939  cofu2  17950  cofucl  17952  cofulid  17954  cofurid  17955  funcres  17960  funcres2  17962  funcres2c  17968  isfull2  17978  isfth2  17982  fthsect  17992  fthmon  17994  fuccocl  18034  fucidcl  18035  invfuc  18044  natpropd  18046  catciso  18178  prfval  18268  prfcl  18272  prf1st  18273  prf2nd  18274  1st2ndprf  18275  evlfcllem  18291  evlfcl  18292  curf1cl  18298  curf2cl  18301  uncf2  18307  curfuncf  18308  uncfcurf  18309  diag2cl  18316  curf2ndf  18317  yonedalem4c  18347  yonedalem3b  18349  yonedainv  18351  yonffthlem  18352  fullthinc  48713  fullthinc2  48714  thincfth  48715  thincciso  48716
  Copyright terms: Public domain W3C validator