AlgebraicCurves.Foundations.Algebra.Proofs.Module_exists_forall_isUnit_surjective_baseChange_of_surjective_baseChange_residueField.K4FSurjSpread.lTensor_surjective_of_subsingleton
Source context 7 commands
Surrounding namespaces, section variables, and local commands at this declaration.
section ProofImplementation
namespace AlgebraicCurves.Foundations.Algebra.Proofs
namespace Module_exists_forall_isUnit_surjective_baseChange_of_surjective_baseChange_residueField
universe u
open TensorProduct
namespace K4FSurjSpread
variable {R : Type u} [CommRing R] {M N : Type u} [AddCommGroup M] [Module R M] [AddCommGroup N]
[Module R N]Lean source · statement
theorem lTensor_surjective_of_subsingleton (f : M →ₗ[R] N) (A : Type u) [AddCommGroup A] [Module R
A]
(h : Subsingleton (A ⊗[R] (N ⧸ LinearMap.range f))) : Function.Surjective (f.lTensor A)