Skip to content

Commit

Permalink
Remove an unnecessary have.
Browse files Browse the repository at this point in the history
  • Loading branch information
grunweg committed May 7, 2024
1 parent eb61403 commit d397f5d
Showing 1 changed file with 1 addition and 2 deletions.
3 changes: 1 addition & 2 deletions SphereEversion/Global/Relation.lean
Original file line number Diff line number Diff line change
Expand Up @@ -392,8 +392,7 @@ theorem RelMfld.SatisfiesHPrincipleWith.bs {R : RelMfld I M IX X} {C : Set (P ×
(∀ p m, dist (f p m) ((𝓕₀ p).bs m) ≤ ε m) ∧ ∀ p m, oneJetExt I IX (f p) m ∈ R := by
rcases h 𝓕₀ h2 with ⟨𝓕, _, h₂, h₃, h₄⟩
refine ⟨fun s ↦ (𝓕 (1, s)).bs, ?_, ?_, ?_, ?_⟩
· have := 𝓕.toFamilyOneJetSec.smooth
let j : C^∞⟮IP, P; 𝓘(ℝ, ℝ).prod IP, ℝ × P⟯ :=
· let j : C^∞⟮IP, P; 𝓘(ℝ, ℝ).prod IP, ℝ × P⟯ :=
fun p ↦ (1, p), Smooth.prod_mk smooth_const smooth_id⟩
rw [show
(uncurry fun s ↦ (𝓕 (1, s)).bs) =
Expand Down

0 comments on commit d397f5d

Please sign in to comment.