Module

map01_oneAddEpsMul.lean

Nyll.JacobianVarieties.Picard.map01_oneAddEpsMul
1 declaration indexed from sourceView source ↗

Naturality of the dual-number overlap unit

Declarations

AlgebraicGeometry.RelPicard.map01_oneAddEpsMul
Source context 4 commands

Surrounding namespaces, section variables, and local commands at this declaration.

section ProofImplementation
namespace JacobianVarieties.Picard.Proofs.S_AlgebraicGeometry_RelPicard_map01_oneAddEpsMul
universe u
open CategoryTheory CategoryTheory.Limits Opposite AlgebraicGeometry NeronModelInfra
  AlgebraicGeometry.RelPicard AlgebraicGeometry.Scheme.TwoAffineOpenCover
theorem _root_.AlgebraicGeometry.RelPicard.map01_oneAddEpsMul
    {R : Type u} [CommRing R] {C C' : Scheme.{u}} {c : C ⟶ Spec (.of R)} {c' : C' ⟶ Spec (.of R)}
    {A : Type u} [CommRing A] [Algebra R A] {𝒱 : C.TwoAffineOpenCover} {𝒲 : C'.TwoAffineOpenCover}
    (f : HomOver (RingHom.id A) (𝒱.pullback c A) (pullback.snd c (specMap R A))
      (𝒲.pullback c' A) (pullback.snd c' (specMap R A)))
    (fε : HomOver (RingHom.id (DualNumber A))
      (𝒱.pullback c (DualNumber A)) (pullback.snd c (specMap R (DualNumber A)))
      (𝒲.pullback c' (DualNumber A)) (pullback.snd c' (specMap R (DualNumber A))))
    (hcomm : fε.hom ≫ (dualNumberThickening A 𝒱 c).hom = (dualNumberThickening A 𝒲 c').hom ≫ f.hom)
    (t : ((𝒱.pullback c A).cover (pullback.snd c (specMap R A))).A01) :
    fε.map01 (oneAddEpsMul A 𝒱 c t) = oneAddEpsMul A 𝒲 c' (f.map01 t)