Theorem: isIntegralCurveOn_comp_add
File: Mathlib/Geometry/Manifold/IntegralCurve.lean

tactic: refine ⟨fun hγ ↦ hγ.comp_add _, fun hγ ↦ ?_⟩
state_before: E : Type u_1
inst✝⁶ : NormedAddCommGroup E
inst✝⁵ : NormedSpace ℝ E
inst✝⁴ : CompleteSpace E
H : Type u_2
inst✝³ : TopologicalSpace H
I : ModelWithCorners ℝ E H
M : Type u_3
inst✝² : TopologicalSpace M
inst✝¹ : ChartedSpace H M
inst✝ : SmoothManifoldWithCorners I M
γ γ' : ℝ → M
v : (x : M) → TangentSpace I x
s s' : Set ℝ
t₀ dt : ℝ
⊢ IsIntegralCurveOn γ v s ↔ IsIntegralCurveOn (γ ∘ fun x => x + dt) v {t | t + dt ∈ s}
state_after: E : Type u_1
inst✝⁶ : NormedAddCommGroup E
inst✝⁵ : NormedSpace ℝ E
inst✝⁴ : CompleteSpace E
H : Type u_2
inst✝³ : TopologicalSpace H
I : ModelWithCorners ℝ E H
M : Type u_3
inst✝² : TopologicalSpace M
inst✝¹ : ChartedSpace H M
inst✝ : SmoothManifoldWithCorners I M
γ γ' : ℝ → M
v : (x : M) → TangentSpace I x
s s' : Set ℝ
t₀ dt : ℝ
hγ : IsIntegralCurveOn (γ ∘ fun x => x + dt) v {t | t + dt ∈ s}
⊢ IsIntegralCurveOn γ v s

tactic: convert hγ.comp_add (-dt)
state_before: E : Type u_1
inst✝⁶ : NormedAddCommGroup E
inst✝⁵ : NormedSpace ℝ E
inst✝⁴ : CompleteSpace E
H : Type u_2
inst✝³ : TopologicalSpace H
I : ModelWithCorners ℝ E H
M : Type u_3
inst✝² : TopologicalSpace M
inst✝¹ : ChartedSpace H M
inst✝ : SmoothManifoldWithCorners I M
γ γ' : ℝ → M
v : (x : M) → TangentSpace I x
s s' : Set ℝ
t₀ dt : ℝ
hγ : IsIntegralCurveOn (γ ∘ fun x => x + dt) v {t | t + dt ∈ s}
⊢ IsIntegralCurveOn γ v s
state_after: case h.e'_11
E : Type u_1
inst✝⁶ : NormedAddCommGroup E
inst✝⁵ : NormedSpace ℝ E
inst✝⁴ : CompleteSpace E
H : Type u_2
inst✝³ : TopologicalSpace H
I : ModelWithCorners ℝ E H
M : Type u_3
inst✝² : TopologicalSpace M
inst✝¹ : ChartedSpace H M
inst✝ : SmoothManifoldWithCorners I M
γ γ' : ℝ → M
v : (x : M) → TangentSpace I x
s s' : Set ℝ
t₀ dt : ℝ
hγ : IsIntegralCurveOn (γ ∘ fun x => x + dt) v {t | t + dt ∈ s}
⊢ γ = (γ ∘ fun x => x + dt) ∘ fun x => x + -dt

case h.e'_13
E : Type u_1
inst✝⁶ : NormedAddCommGroup E
inst✝⁵ : NormedSpace ℝ E
inst✝⁴ : CompleteSpace E
H : Type u_2
inst✝³ : TopologicalSpace H
I : ModelWithCorners ℝ E H
M : Type u_3
inst✝² : TopologicalSpace M
inst✝¹ : ChartedSpace H M
inst✝ : SmoothManifoldWithCorners I M
γ γ' : ℝ → M
v : (x : M) → TangentSpace I x
s s' : Set ℝ
t₀ dt : ℝ
hγ : IsIntegralCurveOn (γ ∘ fun x => x + dt) v {t | t + dt ∈ s}
⊢ s = {t | t + -dt ∈ {t | t + dt ∈ s}}

tactic: ext t
state_before: case h.e'_11
E : Type u_1
inst✝⁶ : NormedAddCommGroup E
inst✝⁵ : NormedSpace ℝ E
inst✝⁴ : CompleteSpace E
H : Type u_2
inst✝³ : TopologicalSpace H
I : ModelWithCorners ℝ E H
M : Type u_3
inst✝² : TopologicalSpace M
inst✝¹ : ChartedSpace H M
inst✝ : SmoothManifoldWithCorners I M
γ γ' : ℝ → M
v : (x : M) → TangentSpace I x
s s' : Set ℝ
t₀ dt : ℝ
hγ : IsIntegralCurveOn (γ ∘ fun x => x + dt) v {t | t + dt ∈ s}
⊢ γ = (γ ∘ fun x => x + dt) ∘ fun x => x + -dt
state_after: case h.e'_11.h
E : Type u_1
inst✝⁶ : NormedAddCommGroup E
inst✝⁵ : NormedSpace ℝ E
inst✝⁴ : CompleteSpace E
H : Type u_2
inst✝³ : TopologicalSpace H
I : ModelWithCorners ℝ E H
M : Type u_3
inst✝² : TopologicalSpace M
inst✝¹ : ChartedSpace H M
inst✝ : SmoothManifoldWithCorners I M
γ γ' : ℝ → M
v : (x : M) → TangentSpace I x
s s' : Set ℝ
t₀ dt : ℝ
hγ : IsIntegralCurveOn (γ ∘ fun x => x + dt) v {t | t + dt ∈ s}
t : ℝ
⊢ γ t = ((γ ∘ fun x => x + dt) ∘ fun x => x + -dt) t

tactic: simp only [Function.comp_apply, neg_add_cancel_right]
state_before: case h.e'_11.h
E : Type u_1
inst✝⁶ : NormedAddCommGroup E
inst✝⁵ : NormedSpace ℝ E
inst✝⁴ : CompleteSpace E
H : Type u_2
inst✝³ : TopologicalSpace H
I : ModelWithCorners ℝ E H
M : Type u_3
inst✝² : TopologicalSpace M
inst✝¹ : ChartedSpace H M
inst✝ : SmoothManifoldWithCorners I M
γ γ' : ℝ → M
v : (x : M) → TangentSpace I x
s s' : Set ℝ
t₀ dt : ℝ
hγ : IsIntegralCurveOn (γ ∘ fun x => x + dt) v {t | t + dt ∈ s}
t : ℝ
⊢ γ t = ((γ ∘ fun x => x + dt) ∘ fun x => x + -dt) t
state_after: no goals

tactic: simp only [mem_setOf_eq, neg_add_cancel_right, setOf_mem_eq]
state_before: case h.e'_13
E : Type u_1
inst✝⁶ : NormedAddCommGroup E
inst✝⁵ : NormedSpace ℝ E
inst✝⁴ : CompleteSpace E
H : Type u_2
inst✝³ : TopologicalSpace H
I : ModelWithCorners ℝ E H
M : Type u_3
inst✝² : TopologicalSpace M
inst✝¹ : ChartedSpace H M
inst✝ : SmoothManifoldWithCorners I M
γ γ' : ℝ → M
v : (x : M) → TangentSpace I x
s s' : Set ℝ
t₀ dt : ℝ
hγ : IsIntegralCurveOn (γ ∘ fun x => x + dt) v {t | t + dt ∈ s}
⊢ s = {t | t + -dt ∈ {t | t + dt ∈ s}}
state_after: no goals