Module.exists_mem_maximalIdeal_isSMulRegular_isSMulRegular
Source context 3 commands
Surrounding namespaces, section variables, and local commands at this declaration.
section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace Module_exists_mem_maximalIdeal_isSMulRegular_isSMulRegularLean source · statement
theorem _root_.Module.exists_mem_maximalIdeal_isSMulRegular_isSMulRegular
{R : Type*} [CommRing R] [IsLocalRing R] [IsNoetherianRing R]
(N₁ N₂ : Type*) [AddCommGroup N₁] [Module R N₁] [Module.Finite R N₁]
[AddCommGroup N₂] [Module R N₂] [Module.Finite R N₂]
(h₁ : ¬ IsAssociatedPrime (IsLocalRing.maximalIdeal R) N₁)
(h₂ : ¬ IsAssociatedPrime (IsLocalRing.maximalIdeal R) N₂) :
∃ z ∈ IsLocalRing.maximalIdeal R, IsSMulRegular N₁ z ∧ IsSMulRegular N₂ z