Disk-like global surfaces of section, unknots, adapted open books
DefinitionHryniewiczCriterion_GlobalSectionLet carry the flow of , and let be a periodic orbit. Write for the closed unit disk in and for the unit circle.
- A smooth disk embedding is a smooth map that is injective on and has injective differential at every point of , boundary included.
- bounds a disk-like global surface of section if there is a smooth disk embedding with such that
- ;
- is transverse to , i.e. for ;
- every trajectory on with meets at arbitrarily large positive and arbitrarily large negative times.
- is unknotted if for some smooth disk embedding with .
- An adapted open book decomposition with disk-like pages and binding is a smooth family , , such that:
- every parametrizes a disk-like global surface of section bounded by ;
- for all , so the binding carries the orientation of the flow;
- every page is positively oriented by ;
- maps bijectively onto with injective differential. Then is a smooth fibration whose fibres are the interiors of the pages, as in Definition 1.2.
These are the notions in which Hryniewicz's criterion (Theorem 1.7) and Theorem 1.8 are stated.
Formalization Note Smoothness up to the boundary of is encoded by asking for a smooth map on all of . The open book stores a page map ℝ → ℝ² → ℝ⁴, -periodic in , together with its properties.
import Definitions.Def_HryniewiczCriterion_Basic
import Mathlib.Analysis.SpecialFunctions.Trigonometric.Basic
/-!
# Disk-like global surfaces of section, unknots and adapted open books
Hryniewicz, arXiv:1105.2077, §1 (pp. 1–2): global surfaces of section, open book
decompositions and Definition 1.2 (adapted open books), specialized to disk-like
surfaces on a star-shaped level `S = H⁻¹(1)` with the flow of `X_H`.
-/
namespace HryniewiczCriterion
noncomputable section
open scoped ContDiff
/-- Parameter plane `ℝ²` of a disk. -/
abbrev Plane := Fin 2 → ℝ
def closedUnitDisk : Set Plane := {u | u 0 ^ 2 + u 1 ^ 2 ≤ 1}
def openUnitDisk : Set Plane := {u | u 0 ^ 2 + u 1 ^ 2 < 1}
def unitCircle : Set Plane := {u | u 0 ^ 2 + u 1 ^ 2 = 1}
/-- The point `(cos 2πt, sin 2πt)`; it runs once counterclockwise around the unit
circle as `t` runs over `[0, 1]`. -/
def circlePoint (t : ℝ) : Plane := ![Real.cos (2 * Real.pi * t), Real.sin (2 * Real.pi * t)]
/-- `e` restricts to a smooth embedding of the closed unit disk: `e` is smooth,
injective on the disk, with injective differential at every point of the disk
(boundary included). -/
def IsSmoothDiskEmbedding (e : Plane → R4) : Prop :=
ContDiff ℝ ∞ e ∧ Set.InjOn e closedUnitDisk ∧
∀ u ∈ closedUnitDisk, Function.Injective (fderiv ℝ e u)
/-- `e` parametrizes a disk-like global surface of section `D = e(closed disk) ⊆ S`
bounded by `P`: `∂D = e(circle)` is the image of `P`; `X_H` is transverse to
`D \ ∂D`; and every trajectory on `S` not contained in `∂D` meets `D` at arbitrarily
large positive and at arbitrarily large negative times. -/
def IsDiskLikeGlobalSectionMap (H : R4 → ℝ) (P : PeriodicOrbit H) (e : Plane → R4) :
Prop :=
IsSmoothDiskEmbedding e ∧
e '' closedUnitDisk ⊆ energySurface H ∧
e '' unitCircle = P.image ∧
(∀ u ∈ openUnitDisk,
hamiltonianVectorField H (e u) ∉ Set.range (fderiv ℝ e u)) ∧
∀ y : ℝ → R4, IsTrajectory H y → y 0 ∉ P.image → ∀ a : ℝ,
(∃ t, a < t ∧ y t ∈ e '' closedUnitDisk) ∧ (∃ t, t < a ∧ y t ∈ e '' closedUnitDisk)
/-- `P` bounds a disk-like global surface of section. -/
def BoundsDiskLikeGlobalSection (H : R4 → ℝ) (P : PeriodicOrbit H) : Prop :=
∃ e : Plane → R4, IsDiskLikeGlobalSectionMap H P e
/-- `P` is unknotted: its image is the boundary of a smoothly embedded closed disk
in `S`. -/
def IsUnknotted (H : R4 → ℝ) (P : PeriodicOrbit H) : Prop :=
∃ e : Plane → R4, IsSmoothDiskEmbedding e ∧ e '' closedUnitDisk ⊆ energySurface H ∧
e '' unitCircle = P.image
/-- An open book decomposition of `S` with disk-like pages and binding `P`, adapted
to the flow (Definition 1.2). Pages are `page θ (closed disk)`, `θ ∈ ℝ/ℤ`:
1. the page family is smooth in `(θ, u)` and `1`-periodic in `θ`;
2. every page is a disk-like global surface of section bounded by `P`;
3. every boundary circle runs along `P` in the flow direction:
`page θ (cos 2πt, sin 2πt) = x(Tt)` (binding orientation = orientation of `P`);
4. pages are positively oriented by `dλ₀ = ω₀`;
5. `(θ, u) ↦ page θ u` maps `[0, 1) × (open disk)` bijectively onto `S \ x(ℝ)`, with
injective differential (so `θ` is a smooth fibration `S \ x(ℝ) → ℝ/ℤ`). -/
structure AdaptedDiskOpenBook (H : R4 → ℝ) (P : PeriodicOrbit H) where
page : ℝ → Plane → R4
smooth : ContDiff ℝ ∞ (fun z : ℝ × Plane => page z.1 z.2)
periodic : ∀ θ u, page (θ + 1) u = page θ u
page_section : ∀ θ, IsDiskLikeGlobalSectionMap H P (page θ)
binding : ∀ θ t, page θ (circlePoint t) = P.x (P.T * t)
page_positive : ∀ θ, ∀ u ∈ openUnitDisk,
0 < omega0 (fderiv ℝ (page θ) u (Pi.single 0 1)) (fderiv ℝ (page θ) u (Pi.single 1 1))
fibration : ∀ y ∈ energySurface H, y ∉ P.image →
∃! z : ℝ × Plane, z.1 ∈ Set.Ico (0 : ℝ) 1 ∧ z.2 ∈ openUnitDisk ∧ page z.1 z.2 = y
regular : ∀ θ : ℝ, ∀ u ∈ openUnitDisk,
Function.Injective (fderiv ℝ (fun z : ℝ × Plane => page z.1 z.2) (θ, u))
/-- `P` is the binding of an adapted open book decomposition with disk-like pages. -/
def HasAdaptedDiskOpenBook (H : R4 → ℝ) (P : PeriodicOrbit H) : Prop :=
Nonempty (AdaptedDiskOpenBook H P)
end
end HryniewiczCriterion
Read-back
What the Lean code literally says, in plain math · claude-opus-5-5
Read-back: Def_HryniewiczCriterion_GlobalSection
Namespace HryniewiczCriterion; uses Def_HryniewiczCriterion_Basic: with coordinates ; ; (zero where is not differentiable); ; trajectories are curves with and for all ; a periodic orbit is a trajectory with a positive (not necessarily minimal) period ; . is arbitrary throughout.
Plane, closedUnitDisk, openUnitDisk, unitCircle
Plane is with coordinates (built-in sup norm; irrelevant for derivatives).
circlePoint
traversing once counter-clockwise (in the orientation) as runs over .
IsSmoothDiskEmbedding
A map qualifies iff
- is on all of ;
- is injective on ;
- for every the derivative is injective.
IsDiskLikeGlobalSectionMap
For , a periodic orbit and , all of:
- is a smooth disk embedding (above);
- ;
- (equality of sets; no orientation, parametrisation or degree condition on );
- for every (open disk): — the vector field is not tangent to the image of the derivative at interior points (nothing is required at boundary points, and no co-orientation/sign is imposed);
- for every trajectory of with , and every : there exists with , and there exists with . Equivalently, the set of hitting times is unbounded above and unbounded below. Hits are counted in the closed image , which includes the boundary .
BoundsDiskLikeGlobalSection
IsUnknotted
There exists which is a smooth disk embedding with and . (Only conditions 1–3 above; no transversality and no return condition. The spanning disk must lie inside .)
AdaptedDiskOpenBook (structure)
Data: a map , written , subject to:
- smooth: is on ;
- periodic: for all , ;
- page_section: for every , is a disk-like global section map for (conditions 1–5 above);
- binding: for all :
so every page restricted to the circle is the same map, and the counter-clockwise boundary circle is sent onto the orbit with one turn of the circle corresponding to time ;
- page_positive: for every and every :
- fibration: for every with there is exactly one pair with , and ;
- regular: for every and , the derivative of at , a linear map , is injective.
Consequence of the fields as written: injectivity of on (from page_section) combined with binding forces to be injective on , i.e. is injective on . Nothing requires to be nonempty, and no condition is stated relating the pages to beyond page_section (images in ) and fibration.
HasAdaptedDiskOpenBook
has an adapted disk open book iff at least one structure AdaptedDiskOpenBook for exists.
Confirmed by the mission captain (proposal self-audit).
Confirmed by the moderator at approval.