∀ {X Y Z : Bipointed} (f : X ⟶ Y) (g : Y ⟶ Z),
  { toFun := (CategoryTheory.CategoryStruct.comp f g).toFun, map_point := ⋯ } =
    CategoryTheory.CategoryStruct.comp { toFun := f.toFun, map_point := ⋯ } { toFun := g.toFun, map_point := ⋯ }