∀ {R : Type u_4} {S : Type u_5} {A : Type u_2} {B : Type u_1} {C : Type u_3} [inst : CommSemiring R]
  [inst_1 : CommSemiring S] [inst_2 : Algebra R S] [inst_3 : Semiring A] [inst_4 : Algebra R A] [inst_5 : Algebra S A]
  [inst_6 : IsScalarTower R S A] [inst_7 : Semiring B] [inst_8 : Algebra R B] [inst_9 : Semiring C]
  [inst_10 : Algebra S C] (f : TensorProduct R A B ≃ₗ[S] C), Function.RightInverse f.invFun (↑f).toFun