Finite categories

A category is finite in this sense if it has finitely many objects, and finitely many morphisms.

Implementation

Prior to #14046, FinCategory required a DecidableEq instance on the object and morphism types. This does not seem to have had any practical payoff (i.e. making some definition constructive) so we have removed these requirements to avoid having to supply instances or delay with non-defeq conflicts between instances.

instance CategoryTheory.discreteFintype {α : Type u_1} [Fintype α] : Fintype (CategoryTheory.Discrete α)

Equations

• CategoryTheory.discreteFintype = Fintype.ofEquiv α CategoryTheory.discreteEquiv.symm

instance CategoryTheory.discreteHomFintype {α : Type u_1} (X : CategoryTheory.Discrete α) (Y : CategoryTheory.Discrete α) : Fintype (X ⟶ Y)

Equations

• CategoryTheory.discreteHomFintype X Y = ULift.fintype (PLift (X.as = Y.as))

class CategoryTheory.FinCategory (J : Type v) [CategoryTheory.SmallCategory J] : Type v

A category with a Fintype of objects, and a Fintype for each morphism space.

• fintypeObj : Fintype J
• fintypeHom : (j j' : J) → Fintype (j ⟶ j')

instance CategoryTheory.finCategoryDiscreteOfFintype (J : Type v) [Fintype J] : CategoryTheory.FinCategory (CategoryTheory.Discrete J)

Equations

• CategoryTheory.finCategoryDiscreteOfFintype J = CategoryTheory.FinCategory.mk

@[inline, reducible]

abbrev CategoryTheory.FinCategory.ObjAsType (α : Type u_1) [Fintype α] : Type

A FinCategory α is equivalent to a category with objects in Type.

Equations

• CategoryTheory.FinCategory.ObjAsType α = CategoryTheory.InducedCategory α ⇑(Fintype.equivFin α).symm

instance CategoryTheory.FinCategory.instFintypeHomObjAsTypeToQuiverToCategoryStructCategoryFinCardCoeEquivInstFunLikeEquivSymmEquivFin (α : Type u_1) [Fintype α] [CategoryTheory.SmallCategory α] [CategoryTheory.FinCategory α] {i : CategoryTheory.FinCategory.ObjAsType α} {j : CategoryTheory.FinCategory.ObjAsType α} : Fintype (i ⟶ j)

Equations

• One or more equations did not get rendered due to their size.

noncomputable def CategoryTheory.FinCategory.objAsTypeEquiv (α : Type u_1) [Fintype α] [CategoryTheory.SmallCategory α] : CategoryTheory.FinCategory.ObjAsType α ≌ α

The constructed category is indeed equivalent to α.

Equations

• CategoryTheory.FinCategory.objAsTypeEquiv α = CategoryTheory.Functor.asEquivalence (CategoryTheory.inducedFunctor ⇑(Fintype.equivFin α).symm)

@[inline, reducible]

abbrev CategoryTheory.FinCategory.AsType (α : Type u_1) [Fintype α] : Type

A FinCategory α is equivalent to a fin_category with in Type.

Equations

• CategoryTheory.FinCategory.AsType α = Fin (Fintype.card α)

theorem CategoryTheory.FinCategory.categoryAsType_id (α : Type u_1) [Fintype α] [CategoryTheory.SmallCategory α] [CategoryTheory.FinCategory α] (i : CategoryTheory.FinCategory.AsType α) : CategoryTheory.CategoryStruct.id i = (Fintype.equivFin (i ⟶ i)) (CategoryTheory.CategoryStruct.id i)

theorem CategoryTheory.FinCategory.categoryAsType_comp (α : Type u_1) [Fintype α] [CategoryTheory.SmallCategory α] [CategoryTheory.FinCategory α] : ∀ {X Y Z : CategoryTheory.FinCategory.AsType α} (f : X ⟶ Y) (g : Y ⟶ Z), CategoryTheory.CategoryStruct.comp f g = (Fintype.equivFin (X ⟶ Z)) (CategoryTheory.CategoryStruct.comp ((Fintype.equivFin (X ⟶ Y)).symm f) ((Fintype.equivFin (Y ⟶ Z)).symm g))

noncomputable instance CategoryTheory.FinCategory.categoryAsType (α : Type u_1) [Fintype α] [CategoryTheory.SmallCategory α] [CategoryTheory.FinCategory α] : CategoryTheory.SmallCategory (CategoryTheory.FinCategory.AsType α)

Equations

• CategoryTheory.FinCategory.categoryAsType α = CategoryTheory.Category.mk

@[simp]

theorem CategoryTheory.FinCategory.asTypeToObjAsType_map (α : Type u_1) [Fintype α] [CategoryTheory.SmallCategory α] [CategoryTheory.FinCategory α] {X : CategoryTheory.FinCategory.AsType α} {Y : CategoryTheory.FinCategory.AsType α} (a : Fin (Fintype.card (X ⟶ Y))) : (CategoryTheory.FinCategory.asTypeToObjAsType α).toPrefunctor.map a = (Fintype.equivFin (X ⟶ Y)).symm a

@[simp]

theorem CategoryTheory.FinCategory.asTypeToObjAsType_obj (α : Type u_1) [Fintype α] [CategoryTheory.SmallCategory α] [CategoryTheory.FinCategory α] (a : CategoryTheory.FinCategory.AsType α) : (CategoryTheory.FinCategory.asTypeToObjAsType α).toPrefunctor.obj a = id a

noncomputable def CategoryTheory.FinCategory.asTypeToObjAsType (α : Type u_1) [Fintype α] [CategoryTheory.SmallCategory α] [CategoryTheory.FinCategory α] : CategoryTheory.Functor (CategoryTheory.FinCategory.AsType α) (CategoryTheory.FinCategory.ObjAsType α)

The "identity" functor from AsType α to ObjAsType α.

Equations

• CategoryTheory.FinCategory.asTypeToObjAsType α = CategoryTheory.Functor.mk { obj := id, map := fun {X Y : CategoryTheory.FinCategory.AsType α} => ⇑(Fintype.equivFin (X ⟶ Y)).symm }

@[simp]

theorem CategoryTheory.FinCategory.objAsTypeToAsType_map (α : Type u_1) [Fintype α] [CategoryTheory.SmallCategory α] [CategoryTheory.FinCategory α] {X : CategoryTheory.FinCategory.ObjAsType α} {Y : CategoryTheory.FinCategory.ObjAsType α} (a : X ⟶ Y) : (CategoryTheory.FinCategory.objAsTypeToAsType α).toPrefunctor.map a = (Fintype.equivFin (X ⟶ Y)) a

@[simp]

theorem CategoryTheory.FinCategory.objAsTypeToAsType_obj (α : Type u_1) [Fintype α] [CategoryTheory.SmallCategory α] [CategoryTheory.FinCategory α] (a : CategoryTheory.FinCategory.ObjAsType α) : (CategoryTheory.FinCategory.objAsTypeToAsType α).toPrefunctor.obj a = id a

noncomputable def CategoryTheory.FinCategory.objAsTypeToAsType (α : Type u_1) [Fintype α] [CategoryTheory.SmallCategory α] [CategoryTheory.FinCategory α] : CategoryTheory.Functor (CategoryTheory.FinCategory.ObjAsType α) (CategoryTheory.FinCategory.AsType α)

The "identity" functor from ObjAsType α to AsType α.

Equations

• CategoryTheory.FinCategory.objAsTypeToAsType α = CategoryTheory.Functor.mk { obj := id, map := fun {X Y : CategoryTheory.FinCategory.ObjAsType α} => ⇑(Fintype.equivFin (X ⟶ Y)) }

noncomputable def CategoryTheory.FinCategory.asTypeEquivObjAsType (α : Type u_1) [Fintype α] [CategoryTheory.SmallCategory α] [CategoryTheory.FinCategory α] : CategoryTheory.FinCategory.AsType α ≌ CategoryTheory.FinCategory.ObjAsType α

The constructed category (AsType α) is equivalent to ObjAsType α.

Equations

• One or more equations did not get rendered due to their size.

noncomputable instance CategoryTheory.FinCategory.asTypeFinCategory (α : Type u_1) [Fintype α] [CategoryTheory.SmallCategory α] [CategoryTheory.FinCategory α] : CategoryTheory.FinCategory (CategoryTheory.FinCategory.AsType α)

Equations

• CategoryTheory.FinCategory.asTypeFinCategory α = CategoryTheory.FinCategory.mk

noncomputable def CategoryTheory.FinCategory.equivAsType (α : Type u_1) [Fintype α] [CategoryTheory.SmallCategory α] [CategoryTheory.FinCategory α] : CategoryTheory.FinCategory.AsType α ≌ α

The constructed category (ObjAsType α) is indeed equivalent to α.

Equations

• CategoryTheory.FinCategory.equivAsType α = (CategoryTheory.FinCategory.asTypeEquivObjAsType α).trans (CategoryTheory.FinCategory.objAsTypeEquiv α)

instance CategoryTheory.finCategoryOpposite {J : Type v} [CategoryTheory.SmallCategory J] [CategoryTheory.FinCategory J] : CategoryTheory.FinCategory Jᵒᵖ

The opposite of a finite category is finite.

Equations

• CategoryTheory.finCategoryOpposite = CategoryTheory.FinCategory.mk

instance CategoryTheory.finCategoryUlift {J : Type v} [CategoryTheory.SmallCategory J] [CategoryTheory.FinCategory J] : CategoryTheory.FinCategory (CategoryTheory.ULiftHom (ULift.{w, v} J))

Applying ULift to morphisms and objects of a category preserves finiteness.

Equations

• CategoryTheory.finCategoryUlift = CategoryTheory.FinCategory.mk