Theorem bj-endbase

Description: Base set of the monoid of endomorphisms on an object of a category. (Contributed by BJ, 5-Apr-2024)

	Ref	Expression
Hypotheses	bj-endval.c	$$⊢\phi \to C\in \mathrm{Cat}$$
	bj-endval.x	$$⊢\phi \to X\in {\mathrm{Base}}_C$$
Assertion	bj-endbase	Could not format assertion : No typesetting found for |- ( ph -> ( Base ` ( ( End ` C ) ` X ) ) = ( X ( Hom ` C ) X ) ) with typecode |-

Proof

Step	Hyp	Ref	Expression
1		bj-endval.c	$$⊢\phi \to C\in \mathrm{Cat}$$
2		bj-endval.x	$$⊢\phi \to X\in {\mathrm{Base}}_C$$
3	1 2	bj-endval	Could not format ( ph -> ( ( End ` C ) ` X ) = { <. ( Base ` ndx ) , ( X ( Hom ` C ) X ) >. , <. ( +g ` ndx ) , ( <. X , X >. ( comp ` C ) X ) >. } ) : No typesetting found for |- ( ph -> ( ( End ` C ) ` X ) = { <. ( Base ` ndx ) , ( X ( Hom ` C ) X ) >. , <. ( +g ` ndx ) , ( <. X , X >. ( comp ` C ) X ) >. } ) with typecode |-
4	3	fveq1d	Could not format ( ph -> ( ( ( End ` C ) ` X ) ` ( Base ` ndx ) ) = ( { <. ( Base ` ndx ) , ( X ( Hom ` C ) X ) >. , <. ( +g ` ndx ) , ( <. X , X >. ( comp ` C ) X ) >. } ` ( Base ` ndx ) ) ) : No typesetting found for |- ( ph -> ( ( ( End ` C ) ` X ) ` ( Base ` ndx ) ) = ( { <. ( Base ` ndx ) , ( X ( Hom ` C ) X ) >. , <. ( +g ` ndx ) , ( <. X , X >. ( comp ` C ) X ) >. } ` ( Base ` ndx ) ) ) with typecode |-
5		fvexd	Could not format ( ph -> ( ( End ` C ) ` X ) e. _V ) : No typesetting found for |- ( ph -> ( ( End ` C ) ` X ) e. _V ) with typecode |-
6		df-base	$$⊢\mathrm{Base}=\mathrm{Slot}1$$
7		1nn	$$⊢1\in \mathbb{N}$$
8	5 6 7	strndxid	Could not format ( ph -> ( ( ( End ` C ) ` X ) ` ( Base ` ndx ) ) = ( Base ` ( ( End ` C ) ` X ) ) ) : No typesetting found for |- ( ph -> ( ( ( End ` C ) ` X ) ` ( Base ` ndx ) ) = ( Base ` ( ( End ` C ) ` X ) ) ) with typecode |-
9		basendxnplusgndx	$$⊢{\mathrm{Base}}_{\mathrm{ndx}}\ne {+}_{\mathrm{ndx}}$$
10		fvex	$$⊢{\mathrm{Base}}_{\mathrm{ndx}}\in \mathrm{V}$$
11		ovex	$$⊢X\mathrm{Hom}\left(C\right)X\in \mathrm{V}$$
12	10 11	fvpr1	$$⊢{\mathrm{Base}}_{\mathrm{ndx}}\ne {+}_{\mathrm{ndx}}\to \left\{⟨{\mathrm{Base}}_{\mathrm{ndx}},X\mathrm{Hom}\left(C\right)X⟩,⟨{+}_{\mathrm{ndx}},⟨X,X⟩\mathrm{comp}\left(C\right)X⟩\right\}\left({\mathrm{Base}}_{\mathrm{ndx}}\right)=X\mathrm{Hom}\left(C\right)X$$
13	9 12	mp1i	$$⊢\phi \to \left\{⟨{\mathrm{Base}}_{\mathrm{ndx}},X\mathrm{Hom}\left(C\right)X⟩,⟨{+}_{\mathrm{ndx}},⟨X,X⟩\mathrm{comp}\left(C\right)X⟩\right\}\left({\mathrm{Base}}_{\mathrm{ndx}}\right)=X\mathrm{Hom}\left(C\right)X$$
14	4 8 13	3eqtr3d	Could not format ( ph -> ( Base ` ( ( End ` C ) ` X ) ) = ( X ( Hom ` C ) X ) ) : No typesetting found for |- ( ph -> ( Base ` ( ( End ` C ) ` X ) ) = ( X ( Hom ` C ) X ) ) with typecode |-