(R : Type u_1) →
  {S : Type u_5} →
    {M : Type u_8} →
      {M₂ : Type u_10} →
        [inst : Semiring R] →
          [inst_1 : Semiring S] →
            [inst_2 : AddCommMonoid M] →
              [inst_3 : AddCommMonoid M₂] →
                [inst_4 : Module R M] →
                  [inst_5 : Module R M₂] →
                    [inst_6 : Module S M] →
                      [inst_7 : Module S M₂] → [LinearMap.CompatibleSMul M M₂ R S] → (M →ₗ[S] M₂) → M →ₗ[R] M₂