Image of bigwedgeᵈ N in bigwedgeᵈ M for corank-one N over a DVR
ProvedexteriorPower.range_map_subtype_eq_maximalIdeal_smul_topLet be a commutative ring which is a domain and a discrete valuation ring, with maximal ideal IsLocalRing.maximalIdeal R, and let be an -module which is free and finite over (given as an additive commutative group with an -module structure). Let be a natural number with , let be an -submodule of , and suppose there is an -linear isomorphism , that is, has corank one with quotient the residue field. The assertion is an equality of submodules of the -th exterior power : the range of the map induced by the inclusion N.subtype of into (the -th exterior power functor applied to that inclusion) equals , the submodule obtained by scaling the whole of by the maximal ideal. The isomorphism enters only through its existence; no compatibility with any chosen basis is required.
This is the simplest case of the theory of elementary divisors over a discrete valuation ring: a submodule whose quotient is the residue field is, in a suitable basis of , of the form for a uniformiser , so that the top exterior power of the inclusion has image . It serves the computation of norms of ideals, being used in Ideal.span_algebraNorm_eq_of_ker_eq_span_of_isDiscreteValuationRing.
import Mathlib set_option maxHeartbeats 4000000 set_option synthInstance.maxHeartbeats 400000 set_option backward.isDefEq.respectTransparency.types false set_option autoImplicit false
theorem exteriorPower.range_map_subtype_eq_maximalIdeal_smul_top {R : Type*} [CommRing R] [IsDomain R]
[IsDiscreteValuationRing R] {M : Type*} [AddCommGroup M] [Module R M] [Module.Free R M] [Module.Finite R M]
{d : ℕ} (hd : Module.finrank R M = d)
(N : Submodule R M) (e : (M ⧸ N) ≃ₗ[R] (R ⧸ IsLocalRing.maximalIdeal R)) :
LinearMap.range (exteriorPower.map d N.subtype) = IsLocalRing.maximalIdeal R • ⊤ := by sorry