-- Module: Mathlib.CategoryTheory.Monoidal.Limits.Basic
Goal:
J : Type w
inst : SmallCategory J
C : Type u
inst_1 : Category.{v, u} C
inst_2 : HasLimitsOfShape.{w, w, v, u} J C
inst_3 : MonoidalCategory.{v, u} C
F : Functor.{w, v, w, u} J C
j : J
dsimp :
  Eq (α := tensorObj.{v, u} (𝒞 := inst_1) (limit F) (tensorUnit.{v, u} C (𝒞 := inst_1)) ⟶ F.obj j)
    (Iso.hom (ρ_ (limit F)) ≫ limit.π F j)
    (CategoryStruct.comp (Y := limit F)
      (CategoryStruct.comp (Y :=
        tensorObj.{v, u} (𝒞 := inst_1) (limit F)
          (limit.{w, w, v, u} (J := J) ((𝟙_ (Functor.{w, v, w, u} J C)) (𝒞 := Functor.category))))
        (𝟙 (limit F) ⊗ₘ
            limit.lift (Functor.obj (Functor.const J) (tensorUnit.{v, u} C (𝒞 := inst_1)))
              { pt := tensorUnit.{v, u} C (𝒞 := inst_1),
                π :=
                  { app := fun (x : J) ↦ 𝟙 (tensorUnit.{v, u} C (𝒞 := inst_1)), naturality := ⋯ :
                    NatTrans.{w, v, w, u} (Functor.obj (Functor.const J) (tensorUnit.{v, u} C (𝒞 := inst_1)))
                      (Functor.obj (Functor.const J) (tensorUnit.{v, u} C (𝒞 := inst_1))) } } :
          tensorObj.{v, u} (𝒞 := inst_1) (limit F) (tensorUnit.{v, u} C (𝒞 := inst_1)) ⟶
            tensorObj.{v, u} (𝒞 := inst_1) (limit F)
              (limit.{w, w, v, u} (J := J) ((𝟙_ (Functor.{w, v, w, u} J C)) (𝒞 := Functor.category))))
        (CategoryStruct.comp (Y :=
            limit (tensorObj (𝒞 := Functor.category) F ((𝟙_ (Functor.{w, v, w, u} J C)) (𝒞 := Functor.category))))
            (limit.lift (tensorObj (𝒞 := Functor.category) F ((𝟙_ (Functor.{w, v, w, u} J C)) (𝒞 := Functor.category)))
              {
                pt :=
                  tensorObj.{v, u} (𝒞 := inst_1) (limit F)
                    (limit.{w, w, v, u} (J := J) ((𝟙_ (Functor.{w, v, w, u} J C)) (𝒞 := Functor.category))),
                π :=
                  {
                    app := fun (j : J) ↦
                      limit.π F j ⊗ₘ limit.π ((𝟙_ (Functor.{w, v, w, u} J C)) (𝒞 := Functor.category)) j,
                    naturality := ⋯ } })
            (limMap (Iso.hom (ρ_ F))) :
          tensorObj.{v, u} (𝒞 := inst_1) (limit F)
              (limit.{w, w, v, u} (J := J) ((𝟙_ (Functor.{w, v, w, u} J C)) (𝒞 := Functor.category))) ⟶
            limit F))
      (limit.π F j))
⊢ Eq (α := tensorObj.{v, u} (𝒞 := inst_1) (Functor.obj lim F) (tensorUnit.{v, u} C (𝒞 := inst_1)) ⟶ F.obj j)
    (Iso.hom (ρ_ (Functor.obj lim F)) ≫ limit.π F j)
    (CategoryStruct.comp (Y := limit F)
      (CategoryStruct.comp (Y :=
        tensorObj.{v, u} (𝒞 := inst_1) (Functor.obj lim F)
          (Functor.obj (C := Functor.{w, v, w, u} J C) lim ((𝟙_ (Functor.{w, v, w, u} J C)) (𝒞 := Functor.category))))
        (𝟙 (Functor.obj lim F) ⊗ₘ
          limit.lift (Functor.obj (Functor.const J) (tensorUnit.{v, u} C (𝒞 := inst_1)))
            { pt := tensorUnit.{v, u} C (𝒞 := inst_1),
              π :=
                {
                  app := fun (x : J) ↦
                    𝟙 (Functor.obj.{w, v, w, u} (Functor.obj (Functor.const J) (tensorUnit.{v, u} C (𝒞 := inst_1))) x),
                  naturality := ⋯ :
                  NatTrans.{w, v, w, u} (Functor.obj (Functor.const J) (tensorUnit.{v, u} C (𝒞 := inst_1)))
                    (Functor.obj (Functor.const J) (tensorUnit.{v, u} C (𝒞 := inst_1))) } })
        (CategoryStruct.comp (Y :=
          Functor.obj lim
            (tensorObj (𝒞 := Functor.category) F ((𝟙_ (Functor.{w, v, w, u} J C)) (𝒞 := Functor.category))))
          ((fun (F G : Functor.{w, v, w, u} J C) ↦
              (limit.lift (tensorObj (𝒞 := Functor.category) F G)
                  { pt := tensorObj.{v, u} (𝒞 := inst_1) (limit F) (limit G),
                    π := { app := fun (j : J) ↦ limit.π F j ⊗ₘ limit.π G j, naturality := ⋯ } } :
                Cone.pt.{w, v, w, u} (J := J) (F := tensorObj (𝒞 := Functor.category) F G)
                    { pt := tensorObj.{v, u} (𝒞 := inst_1) (limit F) (limit G),
                      π :=
                        { app := fun (j : J) ↦ limit.π F j ⊗ₘ limit.π G j, naturality := ⋯ :
                          NatTrans (Functor.obj (Functor.const J) (tensorObj.{v, u} (𝒞 := inst_1) (limit F) (limit G)))
                            (tensorObj (𝒞 := Functor.category) F G) } :
                      Cone (tensorObj (𝒞 := Functor.category) F G) } ⟶
                  limit (tensorObj (𝒞 := Functor.category) F G)))
            F ((𝟙_ (Functor.{w, v, w, u} J C)) (𝒞 := Functor.category)))
          (Functor.map lim (Iso.hom (ρ_ F)))))
      (limit.π F j))

Tactic:
dsimp