{C : Type u} →
  [inst : CategoryTheory.Category.{v, u} C] →
    [toSemiCartesianMonoidalCategory : CategoryTheory.SemiCartesianMonoidalCategory C] →
      ((X Y : C) →
          CategoryTheory.Limits.IsLimit
            (CategoryTheory.Limits.BinaryFan.mk (CategoryTheory.SemiCartesianMonoidalCategory.fst X Y)
              (CategoryTheory.SemiCartesianMonoidalCategory.snd X Y))) →
        CategoryTheory.CartesianMonoidalCategory C