@@ -6,12 +6,10 @@ Authors: Bhavik Mehta, Yaël Dillies
66import Mathlib.Analysis.Convex.Cone.Extension
77import Mathlib.Analysis.Convex.Gauge
88import Mathlib.Analysis.Normed.Module.Convex
9- import Mathlib.Analysis.NormedSpace.Extend
10- import Mathlib.Topology.Algebra.Module.FiniteDimension
11- import Mathlib.Topology.Instances.RealVectorSpace
129import Mathlib.Analysis.RCLike.Extend
1310import Mathlib.Topology.Algebra.Module.FiniteDimension
1411import Mathlib.Topology.Algebra.Module.LocallyConvex
12+ import Mathlib.Topology.Instances.RealVectorSpace
1513
1614/-!
1715# Separation Hahn-Banach theorem
@@ -53,8 +51,7 @@ variable [IsTopologicalAddGroup E] [ContinuousSMul ℝ E]
5351/-- Given a set `s` which is a convex neighbourhood of `0` and a point `x₀` outside of it, there is
5452a continuous linear functional `f` separating `x₀` and `s`, in the sense that it sends `x₀` to 1 and
5553all of `s` to values strictly below `1`. -/
56- theorem separate_convex_open_set [TopologicalSpace E] [AddCommGroup E] [IsTopologicalAddGroup E]
57- [Module ℝ E] [ContinuousSMul ℝ E] {s : Set E} (hs₀ : (0 : E) ∈ s) (hs₁ : Convex ℝ s)
54+ theorem separate_convex_open_set (hs₀ : (0 : E) ∈ s) (hs₁ : Convex ℝ s)
5855 (hs₂ : IsOpen s) {x₀ : E} (hx₀ : x₀ ∉ s) :
5956 ∃ f : StrongDual ℝ E, f x₀ = 1 ∧ ∀ x ∈ s, f x < 1 := by
6057 let f : E →ₗ.[ℝ] ℝ := LinearPMap.mkSpanSingleton x₀ 1 (ne_of_mem_of_not_mem hs₀ hx₀).symm
0 commit comments