Time-endpoint equality transports the actual path norm and its profile without changing any bound.
theorem
EulerPacketCylinderField.Field.WordBound.changeTime
{P T T' : ℝ}
[Fact (0 < P)]
{raw : EulerPacketProfileRecursion.VectorField}
{G : Field P T raw}
{q d : ℕ}
{R A : ℝ}
(hG : G.WordBound q R A d)
(h : T = T')
:
(G.changeTime h).WordBound q R A d
theorem
EulerPacketCylinderField.Field.WordBound.normalized_profile_eq
{P T : ℝ}
[Fact (0 < P)]
{raw : EulerPacketProfileRecursion.VectorField}
{G : Field P T raw}
{q d : ℕ}
{R A : ℝ}
{hT : 0 ≤ T}
{g : C(↑(Set.Icc 0 T), ℝ)}
{hg : ∀ (t : ↑(Set.Icc 0 T)), 0 < g t}
(hG : (G.normalized hT g hg).WordBound q R A d)
(g' : C(↑(Set.Icc 0 T), ℝ))
(hg' : ∀ (t : ↑(Set.Icc 0 T)), 0 < g' t)
(he : g = g')
:
(G.normalized hT g' hg').WordBound q R A d
theorem
EulerPacketCylinderField.Field.WordBound.normalized_changeTime
{P T T' : ℝ}
[Fact (0 < P)]
{raw : EulerPacketProfileRecursion.VectorField}
{G : Field P T raw}
{q d : ℕ}
{R A : ℝ}
(hT : 0 ≤ T)
(g : C(↑(Set.Icc 0 T), ℝ))
(hg : ∀ (t : ↑(Set.Icc 0 T)), 0 < g t)
(hG : (G.normalized hT g hg).WordBound q R A d)
(h : T = T')
(hT' : 0 ≤ T')
(g' : C(↑(Set.Icc 0 T'), ℝ))
(hg' : ∀ (t : ↑(Set.Icc 0 T')), 0 < g' t)
(he : timeProfileChange g h = g')
:
((G.changeTime h).normalized hT' g' hg').WordBound q R A d
@[simp]
theorem
EulerPacketTimeProfile.Scales.changeTime_roundtrip
{T T' : ℝ}
(S : Scales ↑(Set.Icc 0 T))
(h : T = T')
: