Documentation

TauCeti.Geometry.Symplectic.Hamiltonian.MomentMap

Moment maps of infinitesimal actions #

Let σ be a two-form on a manifold M and let a : Z ↦ Z_M be an infinitesimal action of a real Lie algebra 𝔤 on M (TauCeti.InfinitesimalAction). A moment map of a is a map μ : M → 𝔤* whose components μ_Z = ⟨μ, Z⟩ are smooth functions with Hamiltonian vector fields Z_M, in the convention ι_{X_f} σ = df:

ι_{Z_M} σ = d⟨μ, Z⟩ for every Z ∈ 𝔤

(TauCeti.SmoothTwoForm.IsMomentMap). No equivariance is required, so this is the infinitesimal notion; for the fundamental vector fields of a group action, coadjoint equivariance is a separate condition.

This file proves the basic laws of moment maps:

The differential dμ_x : T_x M → 𝔤* of a moment map (TauCeti.SmoothTwoForm.IsMomentMap.differential) satisfies ⟨dμ_x(v), Z⟩ = σ(Z_M x, v). Hence its kernel is the σ-orthogonal (𝔤 · x)^σ of the orbit tangent space (TauCeti.SmoothTwoForm.IsMomentMap.ker_differential) and, where σ is nondegenerate on a finite-dimensional manifold, its image is the annihilator 𝔤_x^0 of the isotropy algebra (TauCeti.SmoothTwoForm.IsMomentMap.range_differential). So dμ_x is surjective exactly when 𝔤_x = 0, that is, when the action is locally free at x, and the rank of dμ_x is the dimension of the orbit tangent space. These identities describe the tangent spaces of the levels of a moment map, the starting point of symplectic reduction. Along a Hamiltonian vector field X of a function f the differential is ⟨dμ_x(X x), Z⟩ = -df_x(Z_M x) (TauCeti.SmoothTwoForm.IsMomentMap.differential_apply_of_isHamiltonianVectorField), so X is tangent to the level at x exactly when df_x vanishes on every Z_M x (TauCeti.SmoothTwoForm.IsMomentMap.mem_ker_differential_iff_of_isHamiltonianVectorField).

The failure of a moment map to be infinitesimally equivariant is measured by its cocycle, the Lie algebra 2-cochain c(Z, Z') = σ(Z_M, Z'_M) - μ_{⁅Z, Z'⁆} on 𝔤 at each point, with values in the trivial module ℝ (TauCeti.SmoothTwoForm.momentCocycle). For a nondegenerate form it is {μ_Z, μ_Z'} - μ_{⁅Z, Z'⁆}. A constant shift μ + ν changes it by the coboundary d ν, and it is compatible with restriction of the action. For a closed form, d(σ(Z_M, Z'_M)) = dμ_{⁅Z, Z'⁆} (TauCeti.SmoothTwoForm.IsMomentMap.mvfderiv_eval₂), so the cocycle is constant on a preconnected manifold (TauCeti.SmoothTwoForm.IsMomentMap.momentCocycle_eq), and it is a Lie algebra 2-cocycle (TauCeti.SmoothTwoForm.IsMomentMap.momentCocycle_mem_twoCocycle). The cocycle vanishes at x exactly when σ(Z_M x, Z'_M x) = μ(x)(⁅Z, Z'⁆) for all Z, Z' (TauCeti.SmoothTwoForm.momentCocycle_eq_zero_iff), and then dμ_x(Z_M x) = ⁅Z, μ(x)⁆, so the isotropy algebra 𝔤_x lies in the coadjoint stabilizer of μ(x) (TauCeti.SmoothTwoForm.IsMomentMap.isotropy_le_lieAnnihilator). For a nondegenerate form, if moreover μ(x) is coadjoint-fixed, the components of μ pairwise Poisson-commute at x (TauCeti.SmoothTwoForm.IsMomentMap.poissonBracket_eq_zero).

The first example is the linear action of the symplectic Lie algebra sp(V, ω), the skew-adjoint endomorphisms of a finite-dimensional symplectic vector space (V, ω), by the vector fields x ↦ A x. Its moment map is μ_A(x) = ½ ω(A x, x) (TauCeti.SymplecticForm.isMomentMap_linearMomentMap), and it is infinitesimally equivariant: {μ_A, μ_B} = μ_{⁅A, B⁆} (TauCeti.SymplecticForm.poissonBracket_linearMomentMap).

The second example is the action of an abelian Lie algebra 𝔤 on (V, ω) by the translations generated by a linear map τ : 𝔤 → V. Its moment map is μ_Z(x) = ω(τ Z, x) (TauCeti.SymplecticForm.isMomentMap_translationMomentMap), and every moment map of this action has the Heisenberg cocycle c(Z, Z') = ω(τ Z, τ Z') (TauCeti.SymplecticForm.momentCocycle_translation), so none is infinitesimally equivariant unless ω vanishes on the image of τ.

Main definitions #

References #

structure TauCeti.SmoothTwoForm.IsMomentMap {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] (σ : SmoothTwoForm I M) (a : InfinitesimalAction 𝔤 I M) (μ : M → Module.Dual ℝ 𝔤) :

μ : M → 𝔤* is a moment map of the infinitesimal action a : Z ↦ Z_M for the two-form σ when every component μ_Z = fun x ↦ μ x Z is smooth and has Hamiltonian vector field Z_M: ι_{Z_M} σ = d μ_Z.

  • contMDiff (Z : 𝔤) : ContMDiff I (modelWithCornersSelf ℝ ℝ) ↑⊤ fun (x : M) => (μ x) Z

    Each component of a moment map is smooth.

  • isHamiltonianVectorField (Z : 𝔤) : σ.IsHamiltonianVectorField (fun (x : M) => (μ x) Z) (a Z)

    The generated vector field Z_M is a Hamiltonian vector field of the component μ_Z.

Instances For
    theorem TauCeti.SmoothTwoForm.isMomentMap_iff {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} :
    σ.IsMomentMap a μ ↔ ∀ (Z : 𝔤), (ContMDiff I (modelWithCornersSelf ℝ ℝ) ↑⊤ fun (x : M) => (μ x) Z) ∧ σ.IsHamiltonianVectorField (fun (x : M) => (μ x) Z) (a Z)

    The defining conditions of a moment map, componentwise.

    theorem TauCeti.SmoothTwoForm.IsMomentMap.eval₂_apply {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} (h : σ.IsMomentMap a μ) (Z : 𝔤) (x : M) (v : TangentSpace I x) :
    SmoothBundleForm.eval₂ σ x (a Z x) v = ((d% fun (y : M) => (μ y) Z) x) v

    The defining identity of a moment map: σ(Z_M x, v) = d μ_Z (v).

    theorem TauCeti.SmoothTwoForm.IsMomentMap.mdifferentiableAt {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} (h : σ.IsMomentMap a μ) (Z : 𝔤) (x : M) :
    (MDiffAt fun (y : M) => (μ y) Z) x

    The components of a moment map are differentiable.

    theorem TauCeti.SmoothTwoForm.IsMomentMap.add_const {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} (h : σ.IsMomentMap a μ) (ν : Module.Dual ℝ 𝔤) :
    σ.IsMomentMap a fun (x : M) => μ x + ν

    Adding a constant ν ∈ 𝔤* to a moment map gives a moment map of the same action.

    theorem TauCeti.SmoothTwoForm.IsMomentMap.neg {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} (h : σ.IsMomentMap a μ) :
    (-σ).IsMomentMap a fun (x : M) => -μ x

    The negative of a moment map for σ is a moment map of the same action for the opposite form -σ.

    theorem TauCeti.SmoothTwoForm.IsMomentMap.comp {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} {𝔥 : Type u_5} [LieRing 𝔥] [LieAlgebra ℝ 𝔥] (h : σ.IsMomentMap a μ) (f : 𝔥 →ₗ⁅ℝ⁆ 𝔤) :
    σ.IsMomentMap (a.comp f) fun (x : M) => μ x ∘ₗ ↑f

    Restriction of moment maps. Along a Lie algebra homomorphism f : 𝔥 → 𝔤, for instance the inclusion of a Lie subalgebra, a moment map μ of a gives the moment map x ↦ μ x ∘ f of the restricted action Z ↦ (f Z)_M.

    theorem TauCeti.SmoothTwoForm.IsMomentMap.mpullback {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} {E' : Type u_5} {H' : Type u_6} {M' : Type u_7} [NormedAddCommGroup E'] [NormedSpace ℝ E'] [TopologicalSpace H'] {I' : ModelWithCorners ℝ E' H'} [TopologicalSpace M'] [ChartedSpace H' M'] [IsManifold I' (↑⊤) M'] {a' : InfinitesimalAction 𝔤 I' M'} (h : σ.IsMomentMap a μ) {φ : M' → M} (hφ : ContMDiff I' I (↑⊤) φ) (hφa : ∀ (Z : 𝔤) (x : M'), (mfderiv% φ x) (a' Z x) = a Z (φ x)) :
    IsMomentMap ((SmoothForm.mpullback φ hφ) σ) a' (μ ∘ φ)

    Transport of moment maps. Let a smooth map φ : M' → M relate an infinitesimal action a' on M' to a, that is dφ (Z_{M'} x) = Z_M (φ x). Then μ ∘ φ is a moment map of a' for the pullback φ^* σ. For instance, an equivariant symplectomorphism carries moment maps to moment maps.

    theorem TauCeti.SmoothTwoForm.IsMomentMap.prod {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} {F : Type u_5} {H' : Type u_6} {N : Type u_7} [NormedAddCommGroup F] [NormedSpace ℝ F] [TopologicalSpace H'] {J : ModelWithCorners ℝ F H'} [TopologicalSpace N] [ChartedSpace H' N] [IsManifold J (↑⊤) N] [CompleteSpace E] [CompleteSpace F] {τ : SmoothTwoForm J N} {b : InfinitesimalAction 𝔤 J N} {ν : N → Module.Dual ℝ 𝔤} (h : σ.IsMomentMap a μ) (h' : τ.IsMomentMap b ν) :
    (σ.prod τ).IsMomentMap (a.prod b) fun (p : M × N) => μ p.1 + ν p.2

    Moment maps of products. If μ and ν are moment maps of infinitesimal actions of the same Lie algebra on (M, σ) and on (N, τ), then (x, y) ↦ μ x + ν y is a moment map of the diagonal action on M × N for the product form pr₁^* σ + pr₂^* τ.

    theorem TauCeti.SmoothTwoForm.IsMomentMap.mfderiv_sub_eq_zero {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ μ' : M → Module.Dual ℝ 𝔤} (h : σ.IsMomentMap a μ) (h' : σ.IsMomentMap a μ') (Z : 𝔤) (x : M) :
    (mfderiv% fun (y : M) => (μ' y) Z - (μ y) Z) x = 0

    Two moment maps of the same action have components differing by functions with vanishing differential.

    theorem TauCeti.SmoothTwoForm.IsMomentMap.isMomentMap_iff_exists_eq_add {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ μ' : M → Module.Dual ℝ 𝔤} [PreconnectedSpace M] (h : σ.IsMomentMap a μ) :
    σ.IsMomentMap a μ' ↔ ∃ (ν : Module.Dual ℝ 𝔤), μ' = fun (x : M) => μ x + ν

    Uniqueness of moment maps up to constants. On a preconnected manifold, the moment maps of an infinitesimal action are exactly the shifts x ↦ μ x + ν of any one moment map μ by constants ν ∈ 𝔤*.

    theorem TauCeti.SmoothTwoForm.IsMomentMap.hamiltonianVectorField_eq {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} [FiniteDimensional ℝ E] (h : σ.IsMomentMap a μ) (hσ : σ.IsNondegenerate) (Z : 𝔤) :
    (σ.hamiltonianVectorField fun (x : M) => (μ x) Z) = a Z

    For a nondegenerate form, the vector field Z_M generated by Z is the Hamiltonian vector field of the component μ_Z.

    theorem TauCeti.SmoothTwoForm.IsMomentMap.poissonBracket_eq_mvfderiv {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} [FiniteDimensional ℝ E] (h : σ.IsMomentMap a μ) (hσ : σ.IsNondegenerate) (f : M → ℝ) (Z : 𝔤) (x : M) :
    σ.poissonBracket f (fun (y : M) => (μ y) Z) x = (d% f x) (a Z x)

    The Poisson bracket {f, μ_Z} is the derivative of f along the generated vector field Z_M.

    theorem TauCeti.SmoothTwoForm.IsMomentMap.poissonBracket_eq_neg_mvfderiv {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} [FiniteDimensional ℝ E] (h : σ.IsMomentMap a μ) (hσ : σ.IsNondegenerate) (f : M → ℝ) (Z : 𝔤) (x : M) :
    σ.poissonBracket (fun (y : M) => (μ y) Z) f x = -(d% f x) (a Z x)

    The Poisson bracket {μ_Z, f} is minus the derivative of f along the generated vector field Z_M.

    theorem TauCeti.SmoothTwoForm.IsMomentMap.poissonBracket_eq_eval₂ {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} [FiniteDimensional ℝ E] (h : σ.IsMomentMap a μ) (hσ : σ.IsNondegenerate) (Z Z' : 𝔤) (x : M) :
    σ.poissonBracket (fun (y : M) => (μ y) Z) (fun (y : M) => (μ y) Z') x = SmoothBundleForm.eval₂ σ x (a Z x) (a Z' x)

    The Poisson bracket of two components of a moment map is the form evaluated on the generated vector fields: {μ_Z, μ_Z'} = σ(Z_M, Z'_M).

    theorem TauCeti.SmoothTwoForm.IsMomentMap.poissonBracket_eq_zero_iff {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} [FiniteDimensional ℝ E] (h : σ.IsMomentMap a μ) (hσ : σ.IsNondegenerate) (f : M → ℝ) (Z : 𝔤) :
    σ.poissonBracket (fun (y : M) => (μ y) Z) f = 0 ↔ ∀ (x : M), (d% f x) (a Z x) = 0

    Noether's theorem. The derivative of a function f along the generated vector field Z_M vanishes exactly when f Poisson-commutes with the component μ_Z of a moment map.

    theorem TauCeti.SmoothTwoForm.IsMomentMap.hamiltonianVectorField_poissonBracket {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} [FiniteDimensional ℝ E] (h : σ.IsMomentMap a μ) (hσ : σ.IsNondegenerate) (hσc : SmoothForm.IsClosed σ) (Z Z' : 𝔤) :
    σ.hamiltonianVectorField (σ.poissonBracket (fun (x : M) => (μ x) Z) fun (x : M) => (μ x) Z') = a ⁅Z, Z'⁆

    For a closed nondegenerate form, the Poisson bracket {μ_Z, μ_Z'} of two components of a moment map has Hamiltonian vector field (⁅Z, Z'⁆)_M, the same as the component μ_{⁅Z, Z'⁆}.

    The differential of a moment map #

    noncomputable def TauCeti.SmoothTwoForm.IsMomentMap.differential {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} (h : σ.IsMomentMap a μ) (x : M) :

    The differential dμ_x : T_x M → 𝔤* of a moment map at x, sending a tangent vector v to Z ↦ dμ_Z(v). It is linear in Z because the moment map identity computes it as dμ_Z(v) = σ(Z_M x, v) (TauCeti.SmoothTwoForm.IsMomentMap.differential_apply_eq_eval₂).

    Instances For
      @[simp]
      theorem TauCeti.SmoothTwoForm.IsMomentMap.differential_apply {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} (h : σ.IsMomentMap a μ) (x : M) (v : TangentSpace I x) (Z : 𝔤) :
      ((h.differential x) v) Z = ((d% fun (y : M) => (μ y) Z) x) v
      theorem TauCeti.SmoothTwoForm.IsMomentMap.differential_apply_eq_eval₂ {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} (h : σ.IsMomentMap a μ) (x : M) (v : TangentSpace I x) (Z : 𝔤) :
      ((h.differential x) v) Z = SmoothBundleForm.eval₂ σ x (a Z x) v

      The moment-map differential identity: ⟨dμ_x(v), Z⟩ = σ(Z_M x, v).

      theorem TauCeti.SmoothTwoForm.IsMomentMap.differential_eq {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} (h : σ.IsMomentMap a μ) (x : M) :

      The differential of a moment map at x is the transpose of the orbit map Z ↦ Z_M(x) composed with the contraction v ↦ σ(·, v) of the form.

      theorem TauCeti.SmoothTwoForm.IsMomentMap.ker_differential {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} (h : σ.IsMomentMap a μ) (x : M) :

      The kernel of the differential of a moment map at x is the σ-orthogonal of the orbit tangent space: ker dμ_x = (𝔤 · x)^σ.

      theorem TauCeti.SmoothTwoForm.IsMomentMap.differential_apply_of_isHamiltonianVectorField {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} (h : σ.IsMomentMap a μ) {f : M → ℝ} {X : (x : M) → TangentSpace I x} (hX : σ.IsHamiltonianVectorField f X) (x : M) (Z : 𝔤) :
      ((h.differential x) (X x)) Z = -(d% f x) (a Z x)

      The differential of a moment map along a Hamiltonian vector field X of f: ⟨dμ_x(X x), Z⟩ = -df_x(Z_M x).

      theorem TauCeti.SmoothTwoForm.IsMomentMap.mem_ker_differential_iff_of_isHamiltonianVectorField {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} (h : σ.IsMomentMap a μ) {f : M → ℝ} {X : (x : M) → TangentSpace I x} (hX : σ.IsHamiltonianVectorField f X) (x : M) :
      X x ∈ (h.differential x).ker ↔ ∀ (Z : 𝔤), (d% f x) (a Z x) = 0

      Noether's theorem at a point. A Hamiltonian vector field X of f is tangent to the level of a moment map at x, X x ∈ ker dμ_x, exactly when the derivative of f at x vanishes along every generated vector field Z_M.

      At a point where the form is nondegenerate, the image of the differential of a moment map is the image of the transpose of the orbit map Z ↦ Z_M(x).

      theorem TauCeti.SmoothTwoForm.IsMomentMap.range_differential {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} [FiniteDimensional ℝ E] (h : σ.IsMomentMap a μ) {x : M} (hσ : (SmoothForm.bilinFormAt σ x).Nondegenerate) :

      The image of the differential of a moment map at a point where the form is nondegenerate is the annihilator of the isotropy algebra: im dμ_x = 𝔤_x^0.

      At a point where the form is nondegenerate, the differential of a moment map is surjective exactly when the isotropy algebra is trivial, that is, when the action is locally free there.

      At a point where the form is nondegenerate, the kernel of the differential of a moment map and the orbit tangent space have complementary dimensions: dim (ker dμ_x) + dim (𝔤 · x) = dim M.

      At a point where the form is nondegenerate, the rank of the differential of a moment map is the dimension of the orbit tangent space: dim (im dμ_x) = dim (𝔤 · x).

      The cocycle of a moment map #

      noncomputable def TauCeti.SmoothTwoForm.momentCocycle {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] (σ : SmoothTwoForm I M) (a : InfinitesimalAction 𝔤 I M) (μ : M → Module.Dual ℝ 𝔤) (x : M) :

      The cocycle at x : M of a map μ : M → 𝔤* for the infinitesimal action a : Z ↦ Z_M: the Lie algebra 2-cochain c(Z, Z') = σ(Z_M x, Z'_M x) - μ(x)(⁅Z, Z'⁆) on 𝔤 with values in the trivial module ℝ. For a moment map of a nondegenerate form it is {μ_Z, μ_Z'} - μ_{⁅Z, Z'⁆} (TauCeti.SmoothTwoForm.IsMomentMap.momentCocycle_apply_eq_poissonBracket), so it vanishes exactly when μ is infinitesimally equivariant.

      Instances For
        @[simp]
        theorem TauCeti.SmoothTwoForm.momentCocycle_apply {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] (σ : SmoothTwoForm I M) (a : InfinitesimalAction 𝔤 I M) (μ : M → Module.Dual ℝ 𝔤) (x : M) (Z Z' : 𝔤) :
        ((σ.momentCocycle a μ x) Z) Z' = (TrivialLieModule.equiv ℝ 𝔤 ℝ).symm (SmoothBundleForm.eval₂ σ x (a Z x) (a Z' x) - (μ x) ⁅Z, Z'⁆)
        theorem TauCeti.SmoothTwoForm.momentCocycle_eq_zero_iff {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} {x : M} :
        σ.momentCocycle a μ x = 0 ↔ ∀ (Z Z' : 𝔤), SmoothBundleForm.eval₂ σ x (a Z x) (a Z' x) = (μ x) ⁅Z, Z'⁆

        The cocycle of μ vanishes at x exactly when σ(Z_M x, Z'_M x) = μ(x)(⁅Z, Z'⁆) for all Z, Z': the pointwise infinitesimal-equivariance condition.

        theorem TauCeti.SmoothTwoForm.momentCocycle_add_const {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] (σ : SmoothTwoForm I M) (a : InfinitesimalAction 𝔤 I M) (μ : M → Module.Dual ℝ 𝔤) (ν : Module.Dual ℝ 𝔤) (x : M) :
        σ.momentCocycle a (fun (y : M) => μ y + ν) x = σ.momentCocycle a μ x + (LieModule.Cohomology.d₁₂ ℝ 𝔤 (TrivialLieModule ℝ 𝔤 ℝ)) (↑(TrivialLieModule.equiv ℝ 𝔤 ℝ).symm ∘ₗ ν)

        Shifting μ by a constant ν ∈ 𝔤* changes its cocycle by the coboundary d ν, which is (Z, Z') ↦ -ν(⁅Z, Z'⁆).

        theorem TauCeti.SmoothTwoForm.momentCocycle_neg {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] (σ : SmoothTwoForm I M) (a : InfinitesimalAction 𝔤 I M) (μ : M → Module.Dual ℝ 𝔤) (x : M) :
        (-σ).momentCocycle a (fun (y : M) => -μ y) x = -σ.momentCocycle a μ x

        Negating both the form and the map negates the cocycle.

        theorem TauCeti.SmoothTwoForm.momentCocycle_comp {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {𝔥 : Type u_5} [LieRing 𝔥] [LieAlgebra ℝ 𝔥] (σ : SmoothTwoForm I M) (a : InfinitesimalAction 𝔤 I M) (μ : M → Module.Dual ℝ 𝔤) (f : 𝔥 →ₗ⁅ℝ⁆ 𝔤) (x : M) (Z Z' : 𝔥) :
        (TrivialLieModule.equiv ℝ 𝔥 ℝ) (((σ.momentCocycle (a.comp f) (fun (y : M) => μ y ∘ₗ ↑f) x) Z) Z') = (TrivialLieModule.equiv ℝ 𝔤 ℝ) (((σ.momentCocycle a μ x) (f Z)) (f Z'))

        The cocycle of the restriction of μ along a Lie algebra homomorphism f : 𝔥 → 𝔤 is the pullback of the cocycle of μ along f.

        theorem TauCeti.SmoothTwoForm.IsMomentMap.momentCocycle_apply_eq_poissonBracket {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} [FiniteDimensional ℝ E] (h : σ.IsMomentMap a μ) (hσ : σ.IsNondegenerate) (Z Z' : 𝔤) (x : M) :
        ((σ.momentCocycle a μ x) Z) Z' = (TrivialLieModule.equiv ℝ 𝔤 ℝ).symm (σ.poissonBracket (fun (y : M) => (μ y) Z) (fun (y : M) => (μ y) Z') x - (μ x) ⁅Z, Z'⁆)

        For a nondegenerate form on a finite-dimensional manifold, the cocycle of a moment map is c(Z, Z') = {μ_Z, μ_Z'} - μ_{⁅Z, Z'⁆}.

        theorem TauCeti.SmoothTwoForm.IsMomentMap.poissonBracket_eq_zero {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} [FiniteDimensional ℝ E] (h : σ.IsMomentMap a μ) (hσ : σ.IsNondegenerate) {x : M} (hc : σ.momentCocycle a μ x = 0) (hμ : lieAnnihilator ℝ 𝔤 (μ x) = ⊤) (Z Z' : 𝔤) :
        σ.poissonBracket (fun (y : M) => (μ y) Z) (fun (y : M) => (μ y) Z') x = 0

        Components of a moment map Poisson-commute at a point where the cocycle of the moment map vanishes and μ(x) is coadjoint-fixed, for instance everywhere for an infinitesimally equivariant moment map of an abelian Lie algebra.

        theorem TauCeti.SmoothTwoForm.IsMomentMap.differential_apply_of_momentCocycle_eq_zero {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} (h : σ.IsMomentMap a μ) {x : M} (hc : σ.momentCocycle a μ x = 0) (Z : 𝔤) :
        (h.differential x) (a Z x) = ⁅Z, μ x⁆

        If the cocycle of a moment map vanishes at x, its differential carries the generated vector Z_M x to the coadjoint action of Z on μ(x): dμ_x(Z_M x) = ⁅Z, μ(x)⁆.

        theorem TauCeti.SmoothTwoForm.IsMomentMap.isotropy_le_lieAnnihilator {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} (h : σ.IsMomentMap a μ) {x : M} (hc : σ.momentCocycle a μ x = 0) :
        a.isotropy x ≤ lieAnnihilator ℝ 𝔤 (μ x)

        If the cocycle of a moment map vanishes at x, the isotropy algebra 𝔤_x is contained in the coadjoint stabilizer of μ(x).

        theorem TauCeti.SmoothTwoForm.IsMomentMap.mvfderiv_eval₂ {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} [CompleteSpace E] (h : σ.IsMomentMap a μ) (hσ : SmoothForm.IsClosed σ) (Z Z' : 𝔤) (x : M) :
        (d% fun (y : M) => SmoothBundleForm.eval₂ σ y (a Z y) (a Z' y)) x = (d% fun (y : M) => (μ y) ⁅Z, Z'⁆) x

        For a closed form, the differential of σ(Z_M, Z'_M) is the differential of the component μ_{⁅Z, Z'⁆} of a moment map: the cocycle σ(Z_M, Z'_M) - μ_{⁅Z, Z'⁆} is locally constant.

        theorem TauCeti.SmoothTwoForm.IsMomentMap.momentCocycle_eq {E : Type u_1} {H : Type u_2} {M : Type u_3} [NormedAddCommGroup E] [NormedSpace ℝ E] [TopologicalSpace H] {I : ModelWithCorners ℝ E H} [TopologicalSpace M] [ChartedSpace H M] [IsManifold I (↑⊤) M] {𝔤 : Type u_4} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] {σ : SmoothTwoForm I M} {a : InfinitesimalAction 𝔤 I M} {μ : M → Module.Dual ℝ 𝔤} [CompleteSpace E] [PreconnectedSpace M] (h : σ.IsMomentMap a μ) (hσ : SmoothForm.IsClosed σ) (x x' : M) :
        σ.momentCocycle a μ x = σ.momentCocycle a μ x'

        The cocycle of a moment map is constant on a preconnected manifold, for a closed form.

        The cocycle identity. For a closed form, the cocycle of a moment map is a Lie algebra 2-cocycle with values in the trivial module ℝ.

        The moment map of the linear symplectic action: for a symplectic vector space (V, ω), the skew-adjoint endomorphisms A ∈ sp(V, ω) act by the vector fields x ↦ A x, and μ_A(x) = ½ ω(A x, x).

        Instances For
          @[simp]
          theorem TauCeti.SymplecticForm.linearMomentMap_apply {V : Type u_1} [AddCommGroup V] [Module ℝ V] (ω : SymplecticForm V) (x : V) (A : ↥(skewAdjointLieSubalgebra ω.toBilinForm)) :
          (ω.linearMomentMap x) A = (fun (v w : V) => (ω.toBilinForm v) w) (↑A x) x / 2
          def TauCeti.SymplecticForm.translationMomentMap {V : Type u_1} [AddCommGroup V] [Module ℝ V] (ω : SymplecticForm V) {𝔤 : Type u_2} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] (τ : 𝔤 →ₗ[ℝ] V) (x : V) :

          The moment map of a translation action: an abelian Lie algebra 𝔤 acting on a symplectic vector space (V, ω) by the constant vector fields x ↦ τ Z has the moment map μ_Z(x) = ω(τ Z, x).

          Instances For
            @[simp]
            theorem TauCeti.SymplecticForm.translationMomentMap_apply {V : Type u_1} [AddCommGroup V] [Module ℝ V] (ω : SymplecticForm V) {𝔤 : Type u_2} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] (τ : 𝔤 →ₗ[ℝ] V) (x : V) (Z : 𝔤) :
            (ω.translationMomentMap τ x) Z = (fun (v w : V) => (ω.toBilinForm v) w) (τ Z) x
            theorem TauCeti.SymplecticForm.fderiv_linearMomentMap_apply {V : Type u_1} [NormedAddCommGroup V] [NormedSpace ℝ V] (ω : SymplecticForm V) [FiniteDimensional ℝ V] (A : ↥(skewAdjointLieSubalgebra ω.toBilinForm)) (x v : V) :
            (fderiv ℝ (fun (y : V) => (ω.linearMomentMap y) A) x) v = (fun (v w : V) => (ω.toBilinForm v) w) (↑A x) v

            The derivative of the moment map component μ_A(x) = ½ ω(A x, x) is v ↦ ω(A x, v).

            The moment map of the linear symplectic action. On a finite-dimensional symplectic vector space (V, ω), μ_A(x) = ½ ω(A x, x) is a moment map of the action of sp(V, ω) by the linear vector fields x ↦ A x.

            The linear moment map is infinitesimally equivariant: the moment map μ_A(x) = ½ ω(A x, x) intertwines the Lie bracket of sp(V, ω) with the Poisson bracket, {μ_A, μ_B} = μ_{⁅A, B⁆}.

            On a finite-dimensional symplectic vector space (V, ω), μ_Z(x) = ω(τ Z, x) is a moment map of the action of an abelian Lie algebra by the translations generated by τ.

            theorem TauCeti.SymplecticForm.momentCocycle_translation {V : Type u_1} [NormedAddCommGroup V] [NormedSpace ℝ V] (ω : SymplecticForm V) [FiniteDimensional ℝ V] {𝔤 : Type u_2} [LieRing 𝔤] [LieAlgebra ℝ 𝔤] [IsLieAbelian 𝔤] (τ : 𝔤 →ₗ[ℝ] V) (μ : V → Module.Dual ℝ 𝔤) (x : V) (Z Z' : 𝔤) :
            ((ω.constSmooth.momentCocycle (InfinitesimalAction.translation τ) μ x) Z) Z' = (TrivialLieModule.equiv ℝ 𝔤 ℝ).symm ((fun (v w : V) => (ω.toBilinForm v) w) (τ Z) (τ Z'))

            The Heisenberg cocycle. For the translations of a symplectic vector space (V, ω) generated by τ : 𝔤 → V, the cocycle of every map μ : V → 𝔤* is c(Z, Z') = ω(τ Z, τ Z'), since the Lie bracket of 𝔤 vanishes. In particular a moment map of this action is infinitesimally equivariant only when ω vanishes on the image of τ.