Skip to content

Commit 024c9d6

Browse files
committed
chore(Topology/Algebra/Module/Star): tag continuity lemmas with fun_prop (#37507)
1 parent 1fb6b28 commit 024c9d6

1 file changed

Lines changed: 4 additions & 2 deletions

File tree

Mathlib/Topology/Algebra/Module/Star.lean

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -52,18 +52,22 @@ def starL' (R : Type*) {A : Type*} [CommSemiring R] [StarRing R] [TrivialStar R]
5252
variable (R : Type*) (A : Type*) [Semiring R] [StarMul R] [TrivialStar R] [AddCommGroup A]
5353
[Module R A] [StarAddMonoid A] [StarModule R A] [Invertible (2 : R)] [TopologicalSpace A]
5454

55+
@[fun_prop]
5556
theorem continuous_selfAdjointPart [ContinuousAdd A] [ContinuousStar A] [ContinuousConstSMul R A] :
5657
Continuous (selfAdjointPart R (A := A)) :=
5758
((continuous_const_smul _).comp <| continuous_id.add continuous_star).subtype_mk _
5859

60+
@[fun_prop]
5961
theorem continuous_skewAdjointPart [ContinuousSub A] [ContinuousStar A] [ContinuousConstSMul R A] :
6062
Continuous (skewAdjointPart R (A := A)) :=
6163
((continuous_const_smul _).comp <| continuous_id.sub continuous_star).subtype_mk _
6264

65+
@[fun_prop]
6366
theorem continuous_decomposeProdAdjoint [IsTopologicalAddGroup A] [ContinuousStar A]
6467
[ContinuousConstSMul R A] : Continuous (StarModule.decomposeProdAdjoint R A) :=
6568
(continuous_selfAdjointPart R A).prodMk (continuous_skewAdjointPart R A)
6669

70+
@[fun_prop]
6771
theorem continuous_decomposeProdAdjoint_symm [ContinuousAdd A] :
6872
Continuous (StarModule.decomposeProdAdjoint R A).symm :=
6973
(continuous_subtype_val.comp continuous_fst).add (continuous_subtype_val.comp continuous_snd)
@@ -86,5 +90,3 @@ as a continuous linear equivalence. -/
8690
def StarModule.decomposeProdAdjointL [IsTopologicalAddGroup A] [ContinuousStar A]
8791
[ContinuousConstSMul R A] : A ≃L[R] selfAdjoint A × skewAdjoint A where
8892
toLinearEquiv := StarModule.decomposeProdAdjoint R A
89-
continuous_toFun := continuous_decomposeProdAdjoint _ _
90-
continuous_invFun := continuous_decomposeProdAdjoint_symm _ _

0 commit comments

Comments
 (0)