Theorem: measurableSet_of_differentiableAt_with_param
File: Mathlib/Analysis/Calculus/FDeriv/Measurable.lean

Proof steps:
state_before: 𝕜 : Type u_1
inst✝¹¹ : NontriviallyNormedField 𝕜
E : Type u_2
inst✝¹⁰ : NormedAddCommGroup E
inst✝⁹ : NormedSpace 𝕜 E
inst✝⁸ : LocallyCompactSpace E
F : Type u_3
inst✝⁷ : NormedAddCommGroup F
inst✝⁶ : NormedSpace 𝕜 F
α : Type u_4
inst✝⁵ : TopologicalSpace α
inst✝⁴ : MeasurableSpace α
inst✝³ : MeasurableSpace E
inst✝² : OpensMeasurableSpace α
inst✝¹ : OpensMeasurableSpace E
f : α → E → F
K : Set (E →L[𝕜] F)
inst✝ : CompleteSpace F
hf : Continuous (Function.uncurry f)
⊢ MeasurableSet {p | DifferentiableAt 𝕜 (f p.1) p.2}
state_after: 𝕜 : Type u_1
inst✝¹¹ : NontriviallyNormedField 𝕜
E : Type u_2
inst✝¹⁰ : NormedAddCommGroup E
inst✝⁹ : NormedSpace 𝕜 E
inst✝⁸ : LocallyCompactSpace E
F : Type u_3
inst✝⁷ : NormedAddCommGroup F
inst✝⁶ : NormedSpace 𝕜 F
α : Type u_4
inst✝⁵ : TopologicalSpace α
inst✝⁴ : MeasurableSpace α
inst✝³ : MeasurableSpace E
inst✝² : OpensMeasurableSpace α
inst✝¹ : OpensMeasurableSpace E
f : α → E → F
K : Set (E →L[𝕜] F)
inst✝ : CompleteSpace F
hf : Continuous (Function.uncurry f)
this : IsComplete univ
⊢ MeasurableSet {p | DifferentiableAt 𝕜 (f p.1) p.2}
tactic: have : IsComplete (univ : Set (E →L[𝕜] F)) := complete_univ
state_before: 𝕜 : Type u_1
inst✝¹¹ : NontriviallyNormedField 𝕜
E : Type u_2
inst✝¹⁰ : NormedAddCommGroup E
inst✝⁹ : NormedSpace 𝕜 E
inst✝⁸ : LocallyCompactSpace E
F : Type u_3
inst✝⁷ : NormedAddCommGroup F
inst✝⁶ : NormedSpace 𝕜 F
α : Type u_4
inst✝⁵ : TopologicalSpace α
inst✝⁴ : MeasurableSpace α
inst✝³ : MeasurableSpace E
inst✝² : OpensMeasurableSpace α
inst✝¹ : OpensMeasurableSpace E
f : α → E → F
K : Set (E →L[𝕜] F)
inst✝ : CompleteSpace F
hf : Continuous (Function.uncurry f)
this : IsComplete univ
⊢ MeasurableSet {p | DifferentiableAt 𝕜 (f p.1) p.2}
state_after: case h.e'_3.h.e'_2.h.a
𝕜 : Type u_1
inst✝¹¹ : NontriviallyNormedField 𝕜
E : Type u_2
inst✝¹⁰ : NormedAddCommGroup E
inst✝⁹ : NormedSpace 𝕜 E
inst✝⁸ : LocallyCompactSpace E
F : Type u_3
inst✝⁷ : NormedAddCommGroup F
inst✝⁶ : NormedSpace 𝕜 F
α : Type u_4
inst✝⁵ : TopologicalSpace α
inst✝⁴ : MeasurableSpace α
inst✝³ : MeasurableSpace E
inst✝² : OpensMeasurableSpace α
inst✝¹ : OpensMeasurableSpace E
f : α → E → F
K : Set (E →L[𝕜] F)
inst✝ : CompleteSpace F
hf : Continuous (Function.uncurry f)
this : IsComplete univ
x✝ : α × E
⊢ DifferentiableAt 𝕜 (f x✝.1) x✝.2 ↔ DifferentiableAt 𝕜 (f x✝.1) x✝.2 ∧ fderiv 𝕜 (f x✝.1) x✝.2 ∈ univ
tactic: convert measurableSet_of_differentiableAt_of_isComplete_with_param hf this
state_before: case h.e'_3.h.e'_2.h.a
𝕜 : Type u_1
inst✝¹¹ : NontriviallyNormedField 𝕜
E : Type u_2
inst✝¹⁰ : NormedAddCommGroup E
inst✝⁹ : NormedSpace 𝕜 E
inst✝⁸ : LocallyCompactSpace E
F : Type u_3
inst✝⁷ : NormedAddCommGroup F
inst✝⁶ : NormedSpace 𝕜 F
α : Type u_4
inst✝⁵ : TopologicalSpace α
inst✝⁴ : MeasurableSpace α
inst✝³ : MeasurableSpace E
inst✝² : OpensMeasurableSpace α
inst✝¹ : OpensMeasurableSpace E
f : α → E → F
K : Set (E →L[𝕜] F)
inst✝ : CompleteSpace F
hf : Continuous (Function.uncurry f)
this : IsComplete univ
x✝ : α × E
⊢ DifferentiableAt 𝕜 (f x✝.1) x✝.2 ↔ DifferentiableAt 𝕜 (f x✝.1) x✝.2 ∧ fderiv 𝕜 (f x✝.1) x✝.2 ∈ univ
state_after: no goals
tactic: simp