Skip to content

Commit 4eca2e2

Browse files
committed
Update Basic.lean
1 parent 27639b2 commit 4eca2e2

1 file changed

Lines changed: 9 additions & 41 deletions

File tree

  • Mathlib/Topology/ContinuousMap/CompactlySupported

Mathlib/Topology/ContinuousMap/CompactlySupported/Basic.lean

Lines changed: 9 additions & 41 deletions
Original file line numberDiff line numberDiff line change
@@ -20,8 +20,8 @@ continuous functions.
2020
When `β` has more structures, `C_c(α, β)` inherits such structures as `AddCommGroup`,
2121
`NonUnitalRing` and `StarRing`.
2222
23-
When the domain `α` is compact, `ContinuousMap.liftCompactlySupported` gives the identification
24-
`C(α, β) ≃ C_c(α, β)`.
23+
When the domain `α` is compact, `CompactlySupportedContinuousMap.continuousMapEquiv`
24+
gives the identification `C(α, β) ≃ C_c(α, β)`.
2525
2626
-/
2727

@@ -116,12 +116,15 @@ theorem eq_of_empty [IsEmpty α] (f g : C_c(α, β)) : f = g :=
116116

117117
/-- A continuous function on a compact space automatically has compact support. -/
118118
@[simps]
119-
def ContinuousMap.liftCompactlySupported [CompactSpace α] : C(α, β) ≃ C_c(α, β) where
119+
def continuousMapEquiv [CompactSpace α] : C(α, β) ≃ C_c(α, β) where
120120
toFun f :=
121121
{ toFun := f
122122
hasCompactSupport' := HasCompactSupport.of_compactSpace f }
123123
invFun f := f
124124

125+
@[deprecated (since := "2025-10-21")] alias ContinuousMap.liftCompactlySupported :=
126+
continuousMapEquiv
127+
125128
variable {γ : Type*} [TopologicalSpace γ] [Zero γ]
126129

127130
/-- Composition of a continuous function `f` with compact support with another continuous function
@@ -715,45 +718,10 @@ lemma exists_add_nnrealPart_add_eq (f g : C_c(α, ℝ)) : ∃ (h : C_c(α, ℝ
715718
use h
716719
refine ⟨hh, ?_⟩
717720
ext x
721+
have hhx := congr(($hh x : ℝ))
718722
simp only [coe_add, Pi.add_apply, nnrealPart_apply, coe_neg, Pi.neg_apply, NNReal.coe_add,
719-
Real.coe_toNNReal', ← neg_add]
720-
have hhx : (f x + g x) ⊔ 0 + ↑(h x) = f x ⊔ 0 + g x ⊔ 0 := by
721-
rw [← Real.coe_toNNReal', ← Real.coe_toNNReal', ← Real.coe_toNNReal', ← NNReal.coe_add,
722-
← NNReal.coe_add]
723-
have hhx' : ((f + g).nnrealPart + h) x = (f.nnrealPart + g.nnrealPart) x := by congr
724-
simp only [coe_add, Pi.add_apply, nnrealPart_apply] at hhx'
725-
exact congrArg toReal hhx'
726-
rcases le_total 0 (f x) with hfx | hfx
727-
· rcases le_total 0 (g x) with hgx | hgx
728-
· simp only [hfx, hgx, add_nonneg, sup_of_le_left, add_eq_left, coe_eq_zero] at hhx
729-
simp [hhx, hfx, hgx, add_nonpos]
730-
· rcases le_total 0 (f x + g x) with hfgx | hfgx
731-
· simp only [hfgx, sup_of_le_left, add_assoc, hfx, hgx, sup_of_le_right, add_zero,
732-
add_eq_left] at hhx
733-
rw [sup_of_le_right (neg_nonpos.mpr hfx), sup_of_le_left (neg_nonneg.mpr hgx),
734-
sup_of_le_right (neg_nonpos.mpr hfgx)]
735-
linarith
736-
· simp only [hfgx, sup_of_le_right, zero_add, hfx, sup_of_le_left, hgx, add_zero] at hhx
737-
rw [sup_of_le_right (neg_nonpos.mpr hfx), sup_of_le_left (neg_nonneg.mpr hgx),
738-
sup_of_le_left (neg_nonneg.mpr hfgx), hhx]
739-
ring
740-
· rcases le_total 0 (g x) with hgx | hgx
741-
· rcases le_total 0 (f x + g x) with hfgx | hfgx
742-
· simp only [hfgx, sup_of_le_left, add_comm, hfx, sup_of_le_right, hgx, zero_add] at hhx
743-
rw [sup_of_le_left (neg_nonneg.mpr hfx), sup_of_le_right (neg_nonpos.mpr hgx),
744-
sup_of_le_right (neg_nonpos.mpr hfgx), zero_add, add_zero]
745-
linarith
746-
· simp only [hfgx, sup_of_le_right, zero_add, hfx, hgx, sup_of_le_left] at hhx
747-
rw [sup_of_le_left (neg_nonneg.mpr hfx), sup_of_le_right (neg_nonpos.mpr hgx),
748-
sup_of_le_left (neg_nonneg.mpr hfgx), hhx]
749-
ring
750-
· simp only [(add_nonpos hfx hgx), sup_of_le_right, zero_add, hfx, hgx, add_zero,
751-
coe_eq_zero] at hhx
752-
rw [sup_of_le_left (neg_nonneg.mpr hfx),
753-
sup_of_le_left (neg_nonneg.mpr hgx),
754-
sup_of_le_left (neg_nonneg.mpr (add_nonpos hfx hgx)), hhx, neg_add_rev, NNReal.coe_zero,
755-
add_zero]
756-
ring
723+
Real.coe_toNNReal', ← neg_add, max_neg_zero] at hhx ⊢
724+
linear_combination hhx
757725

758726
/-- The compactly supported continuous `ℝ≥0`-valued function as a compactly supported `ℝ`-valued
759727
function. -/

0 commit comments

Comments
 (0)