A curve leaving a boundary point of a manifold with boundary has a velocity that does not point outward
ProvedAnosovPlugs.normalCoord_nonneg_of_hasMFDerivWithinAtLet be a smooth 3-manifold with boundary, modelled on the closed half-space , and let be a curve that has, within a set of times , the derivative at the time . Assume that is a boundary point of . Let be a real number in the positive tangent cone of at : a limit of products with , and . For this cone is empty when is not in the closure of , and otherwise it is , , or according as accumulates at from neither side, only from the right, only from the left, or from both sides (for example when , or when ). Write for the normal coordinate of : the first coordinate of in the chart at , positive for vectors that point strictly into . Then
In words: a curve that moves from a boundary point into the manifold has a velocity that does not point outward. For an integral curve of a vector field defined on with and starting at a boundary point, the normal coordinate of is nonnegative; for one defined on with and ending at a boundary point, it is nonpositive. This is the fact behind one inclusion in the sentences of Definitions 2.1: a point whose forward orbit is defined forever has a positive orbit disjoint from , and a point whose backward orbit is defined forever has a negative orbit disjoint from .
Formalization Note The hypothesis on the derivative is Mathlib's HasMFDerivWithinAt for the curve, with the derivative written as the linear map ; the direction is an element of Mathlib's posTangentConeAt s t_0. The two interval cases above are instances, obtained from mem_posTangentConeAt_of_segment_subset. The normal coordinate is the mission's normalCoord.
import Mathlib import Definitions.Def_AnosovPlugs_Gluing open scoped Manifold ContDiff Topology open Set
namespace AnosovPlugs
theorem normalCoord_nonneg_of_hasMFDerivWithinAt
{M : Type} [TopologicalSpace M] [ChartedSpace (EuclideanHalfSpace 3) M] [IsManifold I3 ∞ M]
(γ : ℝ → M) (s : Set ℝ) (t₀ : ℝ) (v : TangentSpace I3 (γ t₀))
(hγ : HasMFDerivWithinAt 𝓘(ℝ, ℝ) I3 γ s t₀ ((1 : ℝ →L[ℝ] ℝ).smulRight v))
(hb : γ t₀ ∈ I3.boundary M) (c : ℝ) (hc : c ∈ posTangentConeAt s t₀) :
0 ≤ c * normalCoord v := by sorry
end AnosovPlugs