∀ {R : Type u_2} {M : Type u_3} {A : Type u_1} [inst : CommSemiring R] [inst_1 : AddCommMonoid M] [inst_2 : Module R M]
  [inst_3 : Semiring A] [inst_4 : Algebra R A] (e : TensorProduct R A M ≃ₗ[A] A) [Module.Flat R M] [FaithfulSMul R A],
  Function.Bijective
    ⇑(LinearMap.mul'' R A ∘ₗ (TensorProduct.AlgebraTensorModule.lTensor A A) (Module.Flat.submoduleAlgebra e).subtype)