∀ {R : Type u_3} {S : Type u_1} [inst : Ring R] [inst_1 : Ring S] (f : R →+* S) {X : ModuleCat R} {Y : ModuleCat S}
  (g : (ModuleCat.restrictScalars f).obj Y ⟶ X) (s : S) (y : ↑Y) (r : R) (s_1 : S),
  (CategoryTheory.ConcreteCategory.hom g) ((r • s_1) • s • y) =
    (RingHom.id R) r • (CategoryTheory.ConcreteCategory.hom g) (s_1 • s • y)