fact: Record Object := object { obj:> Type ; Arrows_inst: Arrows obj ; Equiv_inst: ∀ x y: obj, Equiv (x ⟶ y) ; CatId_inst: CatId obj ; CatComp_inst: CatComp obj ; Category_inst: Category obj }.
imports: MathClasses.interfaces.abstract_algebra MathClasses.interfaces.functors MathClasses.theory.categories