Metamath Proof Explorer


Theorem homadmcd

Description: Decompose an arrow into domain, codomain, and morphism. (Contributed by Mario Carneiro, 11-Jan-2017)

Ref Expression
Hypothesis homahom.h H=HomaC
Assertion homadmcd FXHYF=XY2ndF

Proof

Step Hyp Ref Expression
1 homahom.h H=HomaC
2 1 homarel RelXHY
3 1st2nd RelXHYFXHYF=1stF2ndF
4 2 3 mpan FXHYF=1stF2ndF
5 1st2ndbr RelXHYFXHY1stFXHY2ndF
6 2 5 mpan FXHY1stFXHY2ndF
7 1 homa1 1stFXHY2ndF1stF=XY
8 6 7 syl FXHY1stF=XY
9 8 opeq1d FXHY1stF2ndF=XY2ndF
10 4 9 eqtrd FXHYF=XY2ndF
11 df-ot XY2ndF=XY2ndF
12 10 11 eqtr4di FXHYF=XY2ndF