AlgebraicCurves.RelativeDivisors.Proofs.RelEffCartierDiv_exists_snd_apply_eq_and_notMem_support.AlgebraicGeometry.RelEffCartierDiv.OffSupportSol.main
Source context 20 commands
Surrounding namespaces, section variables, and local commands at this declaration.
section ProofImplementation
namespace AlgebraicCurves.RelativeDivisors.Proofs
namespace RelEffCartierDiv_exists_snd_apply_eq_and_notMem_support
attribute [-instance]
AlgebraicCurve.Place.instIsScalarTowerSubtypeMemValuationSubringToValuationSubring
AlgebraicCurve.Divisor.instDistribMulActionAlgEquiv
AlgebraicCurve.Place.instSMulAlgEquiv
AlgebraicCurve.Place.instIsPrincipalIdealRingSubtypeMemValuationSubringToValuationSubring
AlgebraicCurve.Place.instIsDiscreteValuationRingSubtypeMemValuationSubringToValuationSubring
AlgebraicCurve.Pic0.instDistribMulActionAlgEquiv
AlgebraicCurve.Place.instAlgebraSubtypeMemValuationSubringToValuationSubring
AlgebraicCurve.Place.instMulActionAlgEquiv
AlgebraicCurve.Pic0.instSMulAlgEquiv
AlgebraicCurve.CurveModel.isProper
AlgebraicCurve.CurveModel.isIntegral
AlgebraicCurve.CurveModel.smooth
attribute [-simp]
AlgebraicCurve.Place.mk.injEq
AlgebraicCurve.Divisor.degree_single
AlgebraicCurve.Divisor.smul_single
AlgebraicCurve.Place.smul_toValuationSubring
AlgebraicCurve.Place.heightOneSpectrum_asIdeal
AlgebraicCurve.Place.coe_algebraMap
AlgebraicCurve.Place.ord_one
AlgebraicCurve.Place.coe_smulRingEquiv_apply
AlgebraicCurve.Pic0.coe_degZeroSMulHom
AlgebraicCurve.Place.deg_smul
AlgebraicCurve.Pic0.mk_zero
AlgebraicCurve.Place.mk.sizeOf_spec
AlgebraicCurve.Divisor.degree_smul
AlgebraicCurve.Pic0.mk_add
AlgebraicCurve.Place.ord_zero
AlgebraicCurve.Place.ofHeightOneSpectrum_toValuationSubring
AlgebraicCurve.CurveModel.mk.injEq
AlgebraicCurve.CurveModel.mk.sizeOf_spec
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open _root_.AlgebraicGeometry.RelPicard
open _root_.NeronModelInfra
open _root_.AlgebraicGeometry.SmoothProperCurve
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace RelEffCartierDiv
open _root_.AlgebraicGeometry.RelEffCartierDiv
namespace OffSupportSol
open _root_.AlgebraicGeometry.RelEffCartierDiv
open _root_.AlgebraicGeometryLean source · statement
theorem main
{R : Type u} [CommRing R] {C : Scheme.{u}} (c : C ⟶ Spec (CommRingCat.of R))
[IsProper c] [SmoothOfRelativeDimension 1 c] [GeometricallyIrreducible c]
{T : Scheme.{u}} (t : T ⟶ Spec (CommRingCat.of R)) {d : ℕ} (D : RelEffCartierDiv c d t) (x :
T) :
∃ y : ↥(pullback c t), (pullback.snd c t).base y = x ∧ y ∉ D.I.support