Adic valuations on Dedekind domains

Given a Dedekind domain R of Krull dimension 1 and a maximal ideal v of R, we define the v-adic valuation on R and its extension to the field of fractions K of R. We prove several properties of this valuation, including the existence of uniformizers.

We define the completion of K with respect to the v-adic valuation, denoted v.adicCompletion, and its ring of integers, denoted v.adicCompletionIntegers.

Main definitions

• IsDedekindDomain.HeightOneSpectrum.intValuation v is the v-adic valuation on R.
• IsDedekindDomain.HeightOneSpectrum.valuation v is the v-adic valuation on K.
• IsDedekindDomain.HeightOneSpectrum.adicCompletion v is the completion of K with respect to its v-adic valuation.
• IsDedekindDomain.HeightOneSpectrum.adicCompletionIntegers v is the ring of integers of v.adicCompletion.

Main results

• IsDedekindDomain.HeightOneSpectrum.int_valuation_le_one : The v-adic valuation on R is bounded above by 1.
• IsDedekindDomain.HeightOneSpectrum.int_valuation_lt_one_iff_dvd : The v-adic valuation of r ∈ R is less than 1 if and only if v divides the ideal (r).
• IsDedekindDomain.HeightOneSpectrum.int_valuation_le_pow_iff_dvd : The v-adic valuation of r ∈ R is less than or equal to Multiplicative.ofAdd (-n) if and only if vⁿ divides the ideal (r).
• IsDedekindDomain.HeightOneSpectrum.int_valuation_exists_uniformizer : There exists π ∈ R with v-adic valuation Multiplicative.ofAdd (-1).
• is_dedekind_domain.height_one_spectrum.valuation_of_mk' : The v-adic valuation of r/s ∈ K is the valuation of r divided by the valuation of s.
• IsDedekindDomain.HeightOneSpectrum.valuation_of_algebraMap : The v-adic valuation on K extends the v-adic valuation on R.
• IsDedekindDomain.HeightOneSpectrum.valuation_exists_uniformizer : There exists π ∈ K with v-adic valuation Multiplicative.ofAdd (-1).

Implementation notes

We are only interested in Dedekind domains with Krull dimension 1.

References

• [G. J. Janusz, Algebraic Number Fields][janusz1996]
• [J.W.S. Cassels, A. Frölich, Algebraic Number Theory][cassels1967algebraic]
• [J. Neukirch, Algebraic Number Theory][Neukirch1992]

Tags

dedekind domain, dedekind ring, adic valuation

Adic valuations on the Dedekind domain R

def IsDedekindDomain.HeightOneSpectrum.intValuationDef {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (v : IsDedekindDomain.HeightOneSpectrum R) (r : R) : WithZero (Multiplicative ℤ)

The additive v-adic valuation of r ∈ R is the exponent of v in the factorization of the ideal (r), if r is nonzero, or infinity, if r = 0. intValuationDef is the corresponding multiplicative valuation.

theorem IsDedekindDomain.HeightOneSpectrum.intValuationDef_if_pos {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (v : IsDedekindDomain.HeightOneSpectrum R) {r : R} (hr : r = 0) : IsDedekindDomain.HeightOneSpectrum.intValuationDef v r = 0

theorem IsDedekindDomain.HeightOneSpectrum.intValuationDef_if_neg {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (v : IsDedekindDomain.HeightOneSpectrum R) {r : R} (hr : r ≠ 0) : IsDedekindDomain.HeightOneSpectrum.intValuationDef v r = ↑(↑Multiplicative.ofAdd (-↑(Associates.count (Associates.mk v.asIdeal) (Associates.factors (Associates.mk (Ideal.span {r}))))))

theorem IsDedekindDomain.HeightOneSpectrum.int_valuation_ne_zero {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (v : IsDedekindDomain.HeightOneSpectrum R) (x : R) (hx : x ≠ 0) : IsDedekindDomain.HeightOneSpectrum.intValuationDef v x ≠ 0

Nonzero elements have nonzero adic valuation.

theorem IsDedekindDomain.HeightOneSpectrum.int_valuation_ne_zero' {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (v : IsDedekindDomain.HeightOneSpectrum R) (x : { x // x ∈ nonZeroDivisors R }) : IsDedekindDomain.HeightOneSpectrum.intValuationDef v ↑x ≠ 0

Nonzero divisors have nonzero valuation.

theorem IsDedekindDomain.HeightOneSpectrum.int_valuation_zero_le {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (v : IsDedekindDomain.HeightOneSpectrum R) (x : { x // x ∈ nonZeroDivisors R }) : 0 < IsDedekindDomain.HeightOneSpectrum.intValuationDef v ↑x

Nonzero divisors have valuation greater than zero.

theorem IsDedekindDomain.HeightOneSpectrum.int_valuation_le_one {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (v : IsDedekindDomain.HeightOneSpectrum R) (x : R) : IsDedekindDomain.HeightOneSpectrum.intValuationDef v x ≤ 1

The v-adic valuation on R is bounded above by 1.

theorem IsDedekindDomain.HeightOneSpectrum.int_valuation_lt_one_iff_dvd {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (v : IsDedekindDomain.HeightOneSpectrum R) (r : R) : IsDedekindDomain.HeightOneSpectrum.intValuationDef v r < 1 ↔ v.asIdeal ∣ Ideal.span {r}

The v-adic valuation of r ∈ R is less than 1 if and only if v divides the ideal (r).

theorem IsDedekindDomain.HeightOneSpectrum.int_valuation_le_pow_iff_dvd {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (v : IsDedekindDomain.HeightOneSpectrum R) (r : R) (n : ℕ) : IsDedekindDomain.HeightOneSpectrum.intValuationDef v r ≤ ↑(↑Multiplicative.ofAdd (-↑n)) ↔ v.asIdeal ^ n ∣ Ideal.span {r}

The v-adic valuation of r ∈ R is less than Multiplicative.ofAdd (-n) if and only if vⁿ divides the ideal (r).

theorem IsDedekindDomain.HeightOneSpectrum.IntValuation.map_zero' {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (v : IsDedekindDomain.HeightOneSpectrum R) : IsDedekindDomain.HeightOneSpectrum.intValuationDef v 0 = 0

The v-adic valuation of 0 : R equals 0.

theorem IsDedekindDomain.HeightOneSpectrum.IntValuation.map_one' {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (v : IsDedekindDomain.HeightOneSpectrum R) : IsDedekindDomain.HeightOneSpectrum.intValuationDef v 1 = 1

The v-adic valuation of 1 : R equals 1.

theorem IsDedekindDomain.HeightOneSpectrum.IntValuation.map_mul' {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (v : IsDedekindDomain.HeightOneSpectrum R) (x : R) (y : R) : IsDedekindDomain.HeightOneSpectrum.intValuationDef v (x * y) = IsDedekindDomain.HeightOneSpectrum.intValuationDef v x * IsDedekindDomain.HeightOneSpectrum.intValuationDef v y

The v-adic valuation of a product equals the product of the valuations.

theorem IsDedekindDomain.HeightOneSpectrum.IntValuation.le_max_iff_min_le {a : ℕ} {b : ℕ} {c : ℕ} : ↑Multiplicative.ofAdd (-↑c) ≤ max (↑Multiplicative.ofAdd (-↑a)) (↑Multiplicative.ofAdd (-↑b)) ↔ min a b ≤ c

theorem IsDedekindDomain.HeightOneSpectrum.IntValuation.map_add_le_max' {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (v : IsDedekindDomain.HeightOneSpectrum R) (x : R) (y : R) : IsDedekindDomain.HeightOneSpectrum.intValuationDef v (x + y) ≤ max (IsDedekindDomain.HeightOneSpectrum.intValuationDef v x) (IsDedekindDomain.HeightOneSpectrum.intValuationDef v y)

The v-adic valuation of a sum is bounded above by the maximum of the valuations.

def IsDedekindDomain.HeightOneSpectrum.intValuation {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (v : IsDedekindDomain.HeightOneSpectrum R) : Valuation R (WithZero (Multiplicative ℤ))

The v-adic valuation on R.

theorem IsDedekindDomain.HeightOneSpectrum.int_valuation_exists_uniformizer {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (v : IsDedekindDomain.HeightOneSpectrum R) : ∃ π, IsDedekindDomain.HeightOneSpectrum.intValuationDef v π = ↑(↑Multiplicative.ofAdd (-1))

There exists π ∈ R with v-adic valuation Multiplicative.ofAdd (-1).

Adic valuations on the field of fractions K

def IsDedekindDomain.HeightOneSpectrum.valuation {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] {K : Type u_2} [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : Valuation K (WithZero (Multiplicative ℤ))

The v-adic valuation of x ∈ K is the valuation of r divided by the valuation of s, where r and s are chosen so that x = r/s.

theorem IsDedekindDomain.HeightOneSpectrum.valuation_def {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] {K : Type u_2} [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) (x : K) : ↑(IsDedekindDomain.HeightOneSpectrum.valuation v) x = ↑(Valuation.extendToLocalization (IsDedekindDomain.HeightOneSpectrum.intValuation v) (_ : ∀ (r : R), r ∈ nonZeroDivisors R → r ∈ (↑(Valuation.supp (IsDedekindDomain.HeightOneSpectrum.intValuation v)))ᶜ) K) x

theorem IsDedekindDomain.HeightOneSpectrum.valuation_of_mk' {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] {K : Type u_2} [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) {r : R} {s : { x // x ∈ nonZeroDivisors R }} : ↑(IsDedekindDomain.HeightOneSpectrum.valuation v) (IsLocalization.mk' K r s) = ↑(IsDedekindDomain.HeightOneSpectrum.intValuation v) r / ↑(IsDedekindDomain.HeightOneSpectrum.intValuation v) ↑s

The v-adic valuation of r/s ∈ K is the valuation of r divided by the valuation of s.

theorem IsDedekindDomain.HeightOneSpectrum.valuation_of_algebraMap {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] {K : Type u_2} [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) (r : R) : ↑(IsDedekindDomain.HeightOneSpectrum.valuation v) (↑(algebraMap R K) r) = ↑(IsDedekindDomain.HeightOneSpectrum.intValuation v) r

The v-adic valuation on K extends the v-adic valuation on R.

theorem IsDedekindDomain.HeightOneSpectrum.valuation_le_one {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] {K : Type u_2} [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) (r : R) : ↑(IsDedekindDomain.HeightOneSpectrum.valuation v) (↑(algebraMap R K) r) ≤ 1

The v-adic valuation on R is bounded above by 1.

theorem IsDedekindDomain.HeightOneSpectrum.valuation_lt_one_iff_dvd {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] {K : Type u_2} [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) (r : R) : ↑(IsDedekindDomain.HeightOneSpectrum.valuation v) (↑(algebraMap R K) r) < 1 ↔ v.asIdeal ∣ Ideal.span {r}

The v-adic valuation of r ∈ R is less than 1 if and only if v divides the ideal (r).

theorem IsDedekindDomain.HeightOneSpectrum.valuation_exists_uniformizer {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : ∃ π, ↑(IsDedekindDomain.HeightOneSpectrum.valuation v) π = ↑(↑Multiplicative.ofAdd (-1))

There exists π ∈ K with v-adic valuation Multiplicative.ofAdd (-1).

theorem IsDedekindDomain.HeightOneSpectrum.valuation_uniformizer_ne_zero {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : Classical.choose (_ : ∃ π, ↑(IsDedekindDomain.HeightOneSpectrum.valuation v) π = ↑(↑Multiplicative.ofAdd (-1))) ≠ 0

Uniformizers are nonzero.

Completions with respect to adic valuations

Given a Dedekind domain R with field of fractions K and a maximal ideal v of R, we define the completion of K with respect to its v-adic valuation, denoted v.adicCompletion, and its ring of integers, denoted v.adicCompletionIntegers.

def IsDedekindDomain.HeightOneSpectrum.adicValued {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] {K : Type u_2} [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : Valued K (WithZero (Multiplicative ℤ))

K as a valued field with the v-adic valuation.

theorem IsDedekindDomain.HeightOneSpectrum.adicValued_apply {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] {K : Type u_2} [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) {x : K} : ↑Valued.v x = ↑(IsDedekindDomain.HeightOneSpectrum.valuation v) x

def IsDedekindDomain.HeightOneSpectrum.adicCompletion {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : Type u_2

The completion of K with respect to its v-adic valuation.

instance IsDedekindDomain.HeightOneSpectrum.instFieldAdicCompletion {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : Field (IsDedekindDomain.HeightOneSpectrum.adicCompletion K v)

instance IsDedekindDomain.HeightOneSpectrum.instInhabitedAdicCompletion {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : Inhabited (IsDedekindDomain.HeightOneSpectrum.adicCompletion K v)

instance IsDedekindDomain.HeightOneSpectrum.valuedAdicCompletion {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : Valued (IsDedekindDomain.HeightOneSpectrum.adicCompletion K v) (WithZero (Multiplicative ℤ))

theorem IsDedekindDomain.HeightOneSpectrum.valuedAdicCompletion_def {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) {x : IsDedekindDomain.HeightOneSpectrum.adicCompletion K v} : ↑Valued.v x = Valued.extension x

instance IsDedekindDomain.HeightOneSpectrum.adicCompletion_completeSpace {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : CompleteSpace (IsDedekindDomain.HeightOneSpectrum.adicCompletion K v)

instance IsDedekindDomain.HeightOneSpectrum.AdicCompletion.instCoe {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : Coe K (IsDedekindDomain.HeightOneSpectrum.adicCompletion K v)

def IsDedekindDomain.HeightOneSpectrum.adicCompletionIntegers {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : ValuationSubring (IsDedekindDomain.HeightOneSpectrum.adicCompletion K v)

The ring of integers of adicCompletion.

instance IsDedekindDomain.HeightOneSpectrum.instInhabitedSubtypeAdicCompletionMemValuationSubringInstFieldAdicCompletionInstMembershipInstSetLikeValuationSubringAdicCompletionIntegers {R : Type u_1} [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : Inhabited { x // x ∈ IsDedekindDomain.HeightOneSpectrum.adicCompletionIntegers K v }

theorem IsDedekindDomain.HeightOneSpectrum.mem_adicCompletionIntegers (R : Type u_1) [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) {x : IsDedekindDomain.HeightOneSpectrum.adicCompletion K v} : x ∈ IsDedekindDomain.HeightOneSpectrum.adicCompletionIntegers K v ↔ ↑Valued.v x ≤ 1

instance IsDedekindDomain.HeightOneSpectrum.adicValued.has_uniform_continuous_const_smul' (R : Type u_1) [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : UniformContinuousConstSMul R K

instance IsDedekindDomain.HeightOneSpectrum.adicValued.uniformContinuousConstSMul (R : Type u_1) [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : UniformContinuousConstSMul K K

instance IsDedekindDomain.HeightOneSpectrum.AdicCompletion.algebra' (R : Type u_1) [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : Algebra R (IsDedekindDomain.HeightOneSpectrum.adicCompletion K v)

@[simp]

theorem IsDedekindDomain.HeightOneSpectrum.coe_smul_adicCompletion (R : Type u_1) [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) (r : R) (x : K) : ↑K (r • x) = r • ↑K x

instance IsDedekindDomain.HeightOneSpectrum.instAlgebraAdicCompletionToCommSemiringToSemifieldToSemiringToDivisionSemiringInstFieldAdicCompletion (R : Type u_1) [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : Algebra K (IsDedekindDomain.HeightOneSpectrum.adicCompletion K v)

theorem IsDedekindDomain.HeightOneSpectrum.algebraMap_adicCompletion' (R : Type u_1) [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : ↑(algebraMap R (IsDedekindDomain.HeightOneSpectrum.adicCompletion K v)) = ↑K ∘ ↑(algebraMap R K)

theorem IsDedekindDomain.HeightOneSpectrum.algebraMap_adicCompletion (R : Type u_1) [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : ↑(algebraMap K (IsDedekindDomain.HeightOneSpectrum.adicCompletion K v)) = ↑K

instance IsDedekindDomain.HeightOneSpectrum.instIsScalarTowerAdicCompletionToSMulToCommSemiringToSemiringToDivisionSemiringToSemifieldToSMulToCommSemiringInstFieldAdicCompletionInstAlgebraAdicCompletionToCommSemiringToSemifieldToSemiringToDivisionSemiringInstFieldAdicCompletionAlgebra' (R : Type u_1) [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : IsScalarTower R K (IsDedekindDomain.HeightOneSpectrum.adicCompletion K v)

instance IsDedekindDomain.HeightOneSpectrum.instAlgebraSubtypeAdicCompletionMemValuationSubringInstFieldAdicCompletionInstMembershipInstSetLikeValuationSubringAdicCompletionIntegersToCommSemiringToSemiringToSemiringToRingToDivisionRingToSubsemiringToSubring (R : Type u_1) [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : Algebra R { x // x ∈ IsDedekindDomain.HeightOneSpectrum.adicCompletionIntegers K v }

@[simp]

theorem IsDedekindDomain.HeightOneSpectrum.coe_smul_adicCompletionIntegers (R : Type u_1) [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) (r : R) (x : { x // x ∈ IsDedekindDomain.HeightOneSpectrum.adicCompletionIntegers K v }) : ↑(r • x) = r • ↑x

instance IsDedekindDomain.HeightOneSpectrum.instNoZeroSMulDivisorsSubtypeAdicCompletionMemValuationSubringInstFieldAdicCompletionInstMembershipInstSetLikeValuationSubringAdicCompletionIntegersToZeroToCommMonoidWithZeroToCommSemiringZeroToZeroToCommMonoidWithZeroToCommGroupWithZeroToSemifieldToZeroMemClassToAddZeroClassToAddMonoidToAddMonoidWithOneToAddGroupWithOneToRingToDivisionRingToAddSubmonoidClassToNonAssocSemiringToSemiringToDivisionSemiringToSubsemiringClassInstSubringClassValuationSubringToRingToDivisionRingInstSetLikeValuationSubringToSMulToSemiringToSemiringToSubsemiringToSubringInstAlgebraSubtypeAdicCompletionMemValuationSubringInstFieldAdicCompletionInstMembershipInstSetLikeValuationSubringAdicCompletionIntegersToCommSemiringToSemiringToSemiringToRingToDivisionRingToSubsemiringToSubring (R : Type u_1) [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : NoZeroSMulDivisors R { x // x ∈ IsDedekindDomain.HeightOneSpectrum.adicCompletionIntegers K v }

instance IsDedekindDomain.HeightOneSpectrum.AdicCompletion.instIsScalarTower' (R : Type u_1) [CommRing R] [IsDomain R] [IsDedekindDomain R] (K : Type u_2) [Field K] [Algebra R K] [IsFractionRing R K] (v : IsDedekindDomain.HeightOneSpectrum R) : IsScalarTower R { x // x ∈ IsDedekindDomain.HeightOneSpectrum.adicCompletionIntegers K v } (IsDedekindDomain.HeightOneSpectrum.adicCompletion K v)