Documentation

TauCeti.Geometry.Manifold.Diffeomorph.Cotangent

Cotangent lifts of diffeomorphisms #

A diffeomorphism h : M → N lifts to a diffeomorphism of cotangent bundles,

T*M → T*N, (x, p) ↦ (h x, p ∘ (dh_x)⁻¹),

where the inverse of the differential dh_x is the differential of h⁻¹ at h x (Diffeomorph.cotangent). It is characterized by covering h (Diffeomorph.proj_cotangent) and by preserving the pairing of covectors with tangent vectors: the lifted covector, evaluated on dh_x v, is p v (Diffeomorph.cotangent_snd_apply_mfderiv). It is linear on fibres (Diffeomorph.cotangent_mk_smul), so it sends exactly the zero covectors to zero covectors (Diffeomorph.cotangent_snd_eq_zero_iff). Smoothness of the lift is the smoothness of pulling covectors back along a map, TauCeti.CotangentBundle.contMDiff_mk_comp_mfderiv.

The construction is functorial: cotangent lifts preserve identity maps, inverses and composition (Diffeomorph.cotangent_refl, Diffeomorph.cotangent_symm, Diffeomorph.cotangent_trans), and a diffeomorphism is determined by its lift (Diffeomorph.cotangent_injective, Diffeomorph.cotangent_inj). It is the cotangent counterpart of the tangent lift Diffeomorph.tangent. The cotangent lift of a diffeomorphism preserves the Liouville form and the canonical symplectic form of the cotangent bundle; see TauCeti.Geometry.Symplectic.Cotangent.Bundle.Lift.

By functoriality, a group G acting on M by smooth maps (ContMDiffConstSMul I ∞ G M) acts on T*M by the cotangent lifts of these maps,

g • (x, p) = (g • x, p ∘ (dg_x)⁻¹)

(TauCeti.CotangentBundle.instMulAction), again by smooth maps (TauCeti.CotangentBundle.instContMDiffConstSMul). For a smooth action of a Lie group the lifted action is jointly smooth on G × T*M (TauCeti.CotangentBundle.instContMDiffSMul), since the differential of x ↦ g⁻¹ • x depends smoothly on g. This cotangent-lifted action covers the action on M (TauCeti.CotangentBundle.proj_smul), preserves the pairing of covectors with tangent vectors (TauCeti.CotangentBundle.smul_snd_apply_mfderiv) and the zero section, and the cotangent lift of each x ↦ g • x is the action of g on T*M (Diffeomorph.cotangent_constSmul). Cotangent lifts are equivariant for these actions: the cotangent lift of a diffeomorphism intertwines the lifted actions exactly when the diffeomorphism intertwines the actions on the base (Diffeomorph.cotangent_smul, Diffeomorph.forall_cotangent_smul_iff).

References #

noncomputable def Diffeomorph.cotangent {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {F : Type u_3} [NormedAddCommGroup F] [NormedSpace 𝕜 F] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {H' : Type u_6} [TopologicalSpace H'] {J : ModelWithCorners 𝕜 F H'} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {N : Type u_9} [TopologicalSpace N] [ChartedSpace H' N] [IsManifold I 2 M] [IsManifold J 2 N] (h : Diffeomorph I J M N ↑⊤) :

The cotangent lift of a smooth diffeomorphism h : M → N: the smooth diffeomorphism T*M → T*N sending a covector p at x to the covector p ∘ (dh_x)⁻¹ at h x. Its inverse is the cotangent lift of h.symm.

Instances For
    theorem Diffeomorph.cotangent_apply {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {F : Type u_3} [NormedAddCommGroup F] [NormedSpace 𝕜 F] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {H' : Type u_6} [TopologicalSpace H'] {J : ModelWithCorners 𝕜 F H'} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {N : Type u_9} [TopologicalSpace N] [ChartedSpace H' N] [IsManifold I 2 M] [IsManifold J 2 N] (h : Diffeomorph I J M N ↑⊤) (z : TauCeti.CotangentBundle I M) :
    h.cotangent z = ⟨h z.proj, z.snd ∘SL mfderiv% ⇑h.symm (h z.proj)⟩

    The cotangent lift sends a covector p at x to p ∘ (dh_x)⁻¹ at h x, where (dh_x)⁻¹ is the differential of h.symm at h x.

    @[simp]
    theorem Diffeomorph.proj_cotangent {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {F : Type u_3} [NormedAddCommGroup F] [NormedSpace 𝕜 F] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {H' : Type u_6} [TopologicalSpace H'] {J : ModelWithCorners 𝕜 F H'} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {N : Type u_9} [TopologicalSpace N] [ChartedSpace H' N] [IsManifold I 2 M] [IsManifold J 2 N] (h : Diffeomorph I J M N ↑⊤) (z : TauCeti.CotangentBundle I M) :
    (h.cotangent z).proj = h z.proj

    The cotangent lift of h covers h.

    theorem Diffeomorph.cotangent_snd_apply {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {F : Type u_3} [NormedAddCommGroup F] [NormedSpace 𝕜 F] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {H' : Type u_6} [TopologicalSpace H'] {J : ModelWithCorners 𝕜 F H'} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {N : Type u_9} [TopologicalSpace N] [ChartedSpace H' N] [IsManifold I 2 M] [IsManifold J 2 N] (h : Diffeomorph I J M N ↑⊤) (z : TauCeti.CotangentBundle I M) (w : TangentSpace J (h z.proj)) :
    (h.cotangent z).snd w = z.snd ((mfderiv% ⇑h.symm (h z.proj)) w)

    The lifted covector evaluates a tangent vector w at h x as the original covector evaluates (dh_x)⁻¹ w.

    @[simp]
    theorem Diffeomorph.cotangent_snd_apply_mfderiv {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {F : Type u_3} [NormedAddCommGroup F] [NormedSpace 𝕜 F] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {H' : Type u_6} [TopologicalSpace H'] {J : ModelWithCorners 𝕜 F H'} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {N : Type u_9} [TopologicalSpace N] [ChartedSpace H' N] [IsManifold I 2 M] [IsManifold J 2 N] (h : Diffeomorph I J M N ↑⊤) (z : TauCeti.CotangentBundle I M) (v : TangentSpace I z.proj) :
    (h.cotangent z).snd ((mfderiv% ⇑h z.proj) v) = z.snd v

    The cotangent lift preserves the pairing of covectors with tangent vectors: the lifted covector evaluated on dh_x v is the original covector evaluated on v.

    @[simp]
    theorem Diffeomorph.cotangent_zeroSection {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {F : Type u_3} [NormedAddCommGroup F] [NormedSpace 𝕜 F] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {H' : Type u_6} [TopologicalSpace H'] {J : ModelWithCorners 𝕜 F H'} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {N : Type u_9} [TopologicalSpace N] [ChartedSpace H' N] [IsManifold I 2 M] [IsManifold J 2 N] (h : Diffeomorph I J M N ↑⊤) (x : M) :
    h.cotangent (Bundle.zeroSection (E →L[𝕜] 𝕜) (fun (x : M) => TangentSpace I x →L[𝕜] 𝕜) x) = Bundle.zeroSection (F →L[𝕜] 𝕜) (fun (y : N) => TangentSpace J y →L[𝕜] 𝕜) (h x)

    The cotangent lift of h sends the zero covector at x to the zero covector at h x.

    theorem Diffeomorph.cotangent_mk_smul {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {F : Type u_3} [NormedAddCommGroup F] [NormedSpace 𝕜 F] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {H' : Type u_6} [TopologicalSpace H'] {J : ModelWithCorners 𝕜 F H'} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {N : Type u_9} [TopologicalSpace N] [ChartedSpace H' N] [IsManifold I 2 M] [IsManifold J 2 N] (h : Diffeomorph I J M N ↑⊤) (z : TauCeti.CotangentBundle I M) (c : 𝕜) :
    h.cotangent ⟨z.proj, c • z.snd⟩ = ⟨(h.cotangent z).proj, c • (h.cotangent z).snd⟩

    Cotangent lifts are linear on fibres: rescaling a covector before lifting it rescales the lifted covector by the same scalar.

    @[simp]
    theorem Diffeomorph.cotangent_snd_eq_zero_iff {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {F : Type u_3} [NormedAddCommGroup F] [NormedSpace 𝕜 F] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {H' : Type u_6} [TopologicalSpace H'] {J : ModelWithCorners 𝕜 F H'} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {N : Type u_9} [TopologicalSpace N] [ChartedSpace H' N] [IsManifold I 2 M] [IsManifold J 2 N] (h : Diffeomorph I J M N ↑⊤) {z : TauCeti.CotangentBundle I M} :
    (h.cotangent z).snd = 0 ↔ z.snd = 0

    The cotangent lift of h sends a covector to zero exactly when the covector is zero.

    @[simp]
    theorem Diffeomorph.cotangent_symm {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {F : Type u_3} [NormedAddCommGroup F] [NormedSpace 𝕜 F] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {H' : Type u_6} [TopologicalSpace H'] {J : ModelWithCorners 𝕜 F H'} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {N : Type u_9} [TopologicalSpace N] [ChartedSpace H' N] [IsManifold I 2 M] [IsManifold J 2 N] (h : Diffeomorph I J M N ↑⊤) :

    The inverse of a cotangent lift is the cotangent lift of the inverse diffeomorphism.

    @[simp]

    The cotangent lift of the identity diffeomorphism is the identity diffeomorphism of the cotangent bundle.

    @[simp]
    theorem Diffeomorph.cotangent_trans {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {F : Type u_3} [NormedAddCommGroup F] [NormedSpace 𝕜 F] {G : Type u_4} [NormedAddCommGroup G] [NormedSpace 𝕜 G] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {H' : Type u_6} [TopologicalSpace H'] {J : ModelWithCorners 𝕜 F H'} {H'' : Type u_7} [TopologicalSpace H''] {K : ModelWithCorners 𝕜 G H''} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {N : Type u_9} [TopologicalSpace N] [ChartedSpace H' N] {P : Type u_10} [TopologicalSpace P] [ChartedSpace H'' P] [IsManifold I 2 M] [IsManifold J 2 N] [IsManifold K 2 P] (h : Diffeomorph I J M N ↑⊤) (g : Diffeomorph J K N P ↑⊤) :

    Cotangent lift commutes with composition of smooth diffeomorphisms.

    theorem Diffeomorph.cotangent_injective {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {F : Type u_3} [NormedAddCommGroup F] [NormedSpace 𝕜 F] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {H' : Type u_6} [TopologicalSpace H'] {J : ModelWithCorners 𝕜 F H'} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {N : Type u_9} [TopologicalSpace N] [ChartedSpace H' N] [IsManifold I 2 M] [IsManifold J 2 N] :

    A smooth diffeomorphism is determined by its cotangent lift, which covers it.

    @[simp]
    theorem Diffeomorph.cotangent_inj {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {F : Type u_3} [NormedAddCommGroup F] [NormedSpace 𝕜 F] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {H' : Type u_6} [TopologicalSpace H'] {J : ModelWithCorners 𝕜 F H'} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {N : Type u_9} [TopologicalSpace N] [ChartedSpace H' N] [IsManifold I 2 M] [IsManifold J 2 N] {h h' : Diffeomorph I J M N ↑⊤} :

    Two smooth diffeomorphisms have the same cotangent lift exactly when they are equal.

    @[instance_reducible]
    noncomputable instance TauCeti.CotangentBundle.instSMul {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {G : Type u_11} [Group G] [MulAction G M] [ContMDiffConstSMul I (↑⊤) G M] [IsManifold I 2 M] :

    The cotangent lift of a smooth group action: an element g acts on T*M by the cotangent lift of the diffeomorphism x ↦ g • x, sending a covector p at x to the covector p ∘ (dg_x)⁻¹ at g • x (TauCeti.CotangentBundle.smul_eq_mk).

    theorem TauCeti.CotangentBundle.smul_def {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {G : Type u_11} [Group G] [MulAction G M] [ContMDiffConstSMul I (↑⊤) G M] [IsManifold I 2 M] (g : G) (z : CotangentBundle I M) :

    The cotangent-lifted action of g is the cotangent lift of the diffeomorphism x ↦ g • x.

    theorem TauCeti.CotangentBundle.smul_eq_mk {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {G : Type u_11} [Group G] [MulAction G M] [ContMDiffConstSMul I (↑⊤) G M] [IsManifold I 2 M] (g : G) (z : CotangentBundle I M) :
    g • z = ⟨g • z.proj, z.snd ∘SL (mfderiv% fun (x : M) => g⁻¹ • x) (g • z.proj)⟩

    The cotangent-lifted action sends a covector p at x to the covector p ∘ (dg_x)⁻¹ at g • x, where (dg_x)⁻¹ is the differential of x ↦ g⁻¹ • x at g • x.

    @[simp]
    theorem TauCeti.CotangentBundle.proj_smul {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {G : Type u_11} [Group G] [MulAction G M] [ContMDiffConstSMul I (↑⊤) G M] [IsManifold I 2 M] (g : G) (z : CotangentBundle I M) :
    (g • z).proj = g • z.proj

    The cotangent-lifted action covers the action on the base.

    theorem TauCeti.CotangentBundle.smul_snd_apply {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {G : Type u_11} [Group G] [MulAction G M] [ContMDiffConstSMul I (↑⊤) G M] [IsManifold I 2 M] (g : G) (z : CotangentBundle I M) (w : TangentSpace I (g • z.proj)) :
    (g • z).snd w = z.snd (((mfderiv% fun (x : M) => g⁻¹ • x) (g • z.proj)) w)

    The covector g • p evaluates a tangent vector w at g • x as p evaluates (dg_x)⁻¹ w, the differential of x ↦ g⁻¹ • x at g • x applied to w.

    @[simp]
    theorem TauCeti.CotangentBundle.smul_snd_apply_mfderiv {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {G : Type u_11} [Group G] [MulAction G M] [ContMDiffConstSMul I (↑⊤) G M] [IsManifold I 2 M] (g : G) (z : CotangentBundle I M) (v : TangentSpace I z.proj) :
    (g • z).snd (((mfderiv% fun (x : M) => g • x) z.proj) v) = z.snd v

    The cotangent-lifted action preserves the pairing of covectors with tangent vectors: the covector g • p evaluated on dg_x v is p v.

    @[simp]
    theorem TauCeti.CotangentBundle.smul_zeroSection {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {G : Type u_11} [Group G] [MulAction G M] [ContMDiffConstSMul I (↑⊤) G M] [IsManifold I 2 M] (g : G) (x : M) :
    g • Bundle.zeroSection (E →L[𝕜] 𝕜) (fun (x : M) => TangentSpace I x →L[𝕜] 𝕜) x = Bundle.zeroSection (E →L[𝕜] 𝕜) (fun (x : M) => TangentSpace I x →L[𝕜] 𝕜) (g • x)

    The cotangent-lifted action preserves the zero section.

    @[instance_reducible]
    noncomputable instance TauCeti.CotangentBundle.instMulAction {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {G : Type u_11} [Group G] [MulAction G M] [ContMDiffConstSMul I (↑⊤) G M] [IsManifold I 2 M] :

    The cotangent lift of a smooth group action is a group action.

    instance TauCeti.CotangentBundle.instContMDiffConstSMul {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {G : Type u_11} [Group G] [MulAction G M] [ContMDiffConstSMul I (↑⊤) G M] [IsManifold I 2 M] :

    The cotangent lift of a smooth group action is again an action by smooth maps.

    instance TauCeti.CotangentBundle.instContMDiffSMul {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {G : Type u_11} [Group G] [MulAction G M] [ContMDiffConstSMul I (↑⊤) G M] [IsManifold I 2 M] {EG : Type u_12} {HG : Type u_13} [NormedAddCommGroup EG] [NormedSpace 𝕜 EG] [TopologicalSpace HG] {IG : ModelWithCorners 𝕜 EG HG} [TopologicalSpace G] [ChartedSpace HG G] [LieGroup IG (↑⊤) G] [ContMDiffSMul IG I (↑⊤) G M] :
    ContMDiffSMul IG (I.prod (modelWithCornersSelf 𝕜 (E →L[𝕜] 𝕜))) (↑⊤) G (CotangentBundle I M)

    The cotangent lift of a smooth Lie group action is smooth. If a Lie group G acts smoothly on M, then (g, p) ↦ g • p is smooth on G × T*M: the covector g • p is p pulled back along the differential of x ↦ g⁻¹ • x, which depends smoothly on g.

    @[simp]
    theorem Diffeomorph.cotangent_constSmul {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {G : Type u_11} [Group G] [MulAction G M] [ContMDiffConstSMul I (↑⊤) G M] [IsManifold I 2 M] (g : G) :
    (constSmul I (↑⊤) g).cotangent = constSmul (I.prod (modelWithCornersSelf 𝕜 (E →L[𝕜] 𝕜))) (↑⊤) g

    The cotangent lift of the diffeomorphism x ↦ g • x is the diffeomorphism z ↦ g • z of the cotangent-lifted action.

    theorem Diffeomorph.cotangent_smul {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {F : Type u_3} [NormedAddCommGroup F] [NormedSpace 𝕜 F] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {H' : Type u_6} [TopologicalSpace H'] {J : ModelWithCorners 𝕜 F H'} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {N : Type u_9} [TopologicalSpace N] [ChartedSpace H' N] {G : Type u_11} [Group G] [MulAction G M] [ContMDiffConstSMul I (↑⊤) G M] [IsManifold I 2 M] [MulAction G N] [ContMDiffConstSMul J (↑⊤) G N] [IsManifold J 2 N] (h : Diffeomorph I J M N ↑⊤) (g : G) (hh : ∀ (x : M), h (g • x) = g • h x) (z : TauCeti.CotangentBundle I M) :
    h.cotangent (g • z) = g • h.cotangent z

    Cotangent lifts of equivariant diffeomorphisms are equivariant. If h : M → N commutes with the action of g, its cotangent lift commutes with the cotangent-lifted action of g.

    theorem Diffeomorph.forall_cotangent_smul_iff {𝕜 : Type u_1} [NontriviallyNormedField 𝕜] {E : Type u_2} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {F : Type u_3} [NormedAddCommGroup F] [NormedSpace 𝕜 F] {H : Type u_5} [TopologicalSpace H] {I : ModelWithCorners 𝕜 E H} {H' : Type u_6} [TopologicalSpace H'] {J : ModelWithCorners 𝕜 F H'} {M : Type u_8} [TopologicalSpace M] [ChartedSpace H M] {N : Type u_9} [TopologicalSpace N] [ChartedSpace H' N] {G : Type u_11} [Group G] [MulAction G M] [ContMDiffConstSMul I (↑⊤) G M] [IsManifold I 2 M] [MulAction G N] [ContMDiffConstSMul J (↑⊤) G N] [IsManifold J 2 N] (h : Diffeomorph I J M N ↑⊤) (g : G) :
    (∀ (z : TauCeti.CotangentBundle I M), h.cotangent (g • z) = g • h.cotangent z) ↔ ∀ (x : M), h (g • x) = g • h x

    Equivariance of cotangent lifts. The cotangent lift of a diffeomorphism h : M → N commutes with the cotangent-lifted action of g exactly when h commutes with the action of g on the base.