Skip to content

Commit 6583359

Browse files
justus-springerBergschaf
authored andcommitted
chore(RingTheory/Smooth/Basic): fix namespace of mvPolynomial instance (leanprover-community#39706)
This instance should be in the `FormallySmooth` namespace (it currently is just `Algebra.mvPolynomial`).
1 parent 76b21e9 commit 6583359

2 files changed

Lines changed: 5 additions & 3 deletions

File tree

Mathlib/RingTheory/Smooth/Basic.lean

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -108,7 +108,7 @@ lemma FormallySmooth.comp_surjective [FormallySmooth R A] (I : Ideal B) (hI : I
108108
exact ⟨l.comp g, by rw [← AlgHom.comp_assoc, ← this, AlgHom.comp_assoc, hg, AlgHom.comp_id]⟩
109109

110110
set_option backward.isDefEq.respectTransparency false in
111-
instance mvPolynomial (σ : Type*) : FormallySmooth R (MvPolynomial σ R) := by
111+
instance instFormallySmoothMvPolynomial (σ : Type*) : FormallySmooth R (MvPolynomial σ R) := by
112112
let P : Generators R (MvPolynomial σ R) σ :=
113113
.ofSurjective X (by simp [aeval_X_left, Function.Surjective])
114114
have : Subsingleton ↥P.toExtension.ker :=
@@ -118,6 +118,8 @@ instance mvPolynomial (σ : Type*) : FormallySmooth R (MvPolynomial σ R) := by
118118
have := P.toExtension.h1Cotangentι_injective.subsingleton
119119
exact ⟨inferInstance, P.equivH1Cotangent.symm.subsingleton⟩
120120

121+
@[deprecated (since := "2026-05-22")] alias mvPolynomial := instFormallySmoothMvPolynomial
122+
121123
end
122124

123125
namespace FormallySmooth

Mathlib/RingTheory/Smooth/Quotient.lean

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -104,14 +104,14 @@ lemma Algebra.FormallySmooth.of_surjective_of_ker_eq_map_of_flat [Module.Flat R
104104
(sq0 : (RingHom.ker (algebraMap R R')) ^ 2 = ⊥) (smoothq : Algebra.FormallySmooth R' S') :
105105
Algebra.FormallySmooth R S := by
106106
let P := (Algebra.Generators.self R S).toExtension
107-
let : Algebra.FormallySmooth R P.Ring := Algebra.mvPolynomial S
107+
let : Algebra.FormallySmooth R P.Ring := instFormallySmoothMvPolynomial S
108108
let IP := (RingHom.ker (algebraMap R R')).map (algebraMap R P.Ring)
109109
let Gen : Algebra.Generators R' S' S := {
110110
val := algebraMap S S'
111111
σ' := fun s' ↦ MvPolynomial.X (Classical.choose (surjS s'))
112112
aeval_val_σ' s' := by simp [Classical.choose_spec (surjS s')] }
113113
let P' := Gen.toExtension
114-
let : Algebra.FormallySmooth R' P'.Ring := Algebra.mvPolynomial S
114+
let : Algebra.FormallySmooth R' P'.Ring := instFormallySmoothMvPolynomial S
115115
let : Algebra P.Ring P'.Ring := MvPolynomial.algebraMvPolynomial
116116
let : IsScalarTower R P.Ring P'.Ring :=
117117
IsScalarTower.of_algebraMap_eq (fun x ↦ (MvPolynomial.map_C _ x).symm)

0 commit comments

Comments
 (0)