fact: Definition forget: Object → setoids.Object := @product.project unit (λ _, setoids.Object) (λ _, _: Arrows setoids.Object) _ (λ _, _: CatId setoids.Object) (λ _, _: CatComp setoids.Object) (λ _, _: Category setoids.Object) tt ∘ forget_algebra.object theory ∘ forget_variety.forget theory.
imports: MathClasses.interfaces.abstract_algebra MathClasses.interfaces.universal_algebra MathClasses.theory.ua_homomorphisms MathClasses.misc.workaround_tactics categories.categories