∀ {R : Type u_1} {S : Type u_3} {M : Type u_4} {M₁ : Type u_5} [inst : Semiring R] [inst_1 : AddCommMonoid M]
  [inst_2 : AddCommMonoid M₁] [inst_3 : Module R M] [inst_4 : Module R M₁] [inst_5 : Semiring S] [inst_6 : Module R S]
  [inst_7 : Module S M] [inst_8 : IsScalarTower R S M] [IsDomain S] {f : M₁ →ₗ[R] S} {x : M} [Module.IsTorsionFree S M],
  f.smulRight x = 0 ↔ f = 0 ∨ x = 0