∀ (R : Type u_1) [inst : CommRing R] {X Y Z : (CategoryTheory.Mon (CommAlgCat R)ᵒᵖ)ᵒᵖ} (f : X ⟶ Y) (g : Y ⟶ Z),
  CommBialgCat.ofHom
      (BialgHom.ofAlgHom (CommAlgCat.Hom.hom (CategoryTheory.CategoryStruct.comp f g).unop.hom.unop) ⋯ ⋯) =
    CategoryTheory.CategoryStruct.comp (CommBialgCat.ofHom (BialgHom.ofAlgHom (CommAlgCat.Hom.hom f.unop.hom.unop) ⋯ ⋯))
      (CommBialgCat.ofHom (BialgHom.ofAlgHom (CommAlgCat.Hom.hom g.unop.hom.unop) ⋯ ⋯))