{R : Type u_1} →
  (S : Type u_2) →
    [inst : CommRing R] →
      [inst_1 : CommRing S] →
        [inst_2 : Algebra R S] →
          (T : Type u_3) →
            [inst_3 : CommRing T] →
              [inst_4 : Algebra R T] →
                [inst_5 : Algebra S T] →
                  [inst_6 : IsScalarTower R S T] →
                    {A : Type u_4} →
                      {B : Type u_5} →
                        [inst_7 : CommRing A] →
                          [inst_8 : CommRing B] →
                            [inst_9 : Algebra R A] →
                              [inst_10 : Algebra R B] →
                                (f g : A →ₐ[R] B) →
                                  [Module.Flat R T] →
                                    TensorProduct R T ↥(AlgHom.equalizer f g) ≃ₐ[S]
                                      ↥(AlgHom.equalizer (Algebra.TensorProduct.map (AlgHom.id S T) f)
                                          (Algebra.TensorProduct.map (AlgHom.id S T) g))