Skip to content

Commit

Permalink
feat: s⁻¹.encard = s.encard (#19400)
Browse files Browse the repository at this point in the history
From Kneser (LeanCamCombi)
  • Loading branch information
YaelDillies committed Nov 23, 2024
1 parent 6343082 commit cc6b7ff
Showing 1 changed file with 14 additions and 0 deletions.
14 changes: 14 additions & 0 deletions Mathlib/Algebra/Group/Pointwise/Set/Card.lean
Original file line number Diff line number Diff line change
Expand Up @@ -3,6 +3,7 @@ Copyright (c) 2024 Yaël Dillies. All rights reserved.
Released under Apache 2.0 license as described in the file LICENSE.
Authors: Yaël Dillies
-/
import Mathlib.Data.Set.Card
import Mathlib.Data.Set.Pointwise.Finite
import Mathlib.SetTheory.Cardinal.Finite

Expand Down Expand Up @@ -49,6 +50,12 @@ lemma natCard_inv (s : Set G) : Nat.card ↥(s⁻¹) = Nat.card s := by

@[to_additive (attr := deprecated (since := "2024-09-30"))] alias card_inv := natCard_inv

@[to_additive (attr := simp)]
lemma encard_inv (s : Set G) : s⁻¹.encard = s.encard := by simp [encard, PartENat.card]

@[to_additive (attr := simp)]
lemma ncard_inv (s : Set G) : s⁻¹.ncard = s.ncard := by simp [ncard]

end InvolutiveInv

section DivInvMonoid
Expand Down Expand Up @@ -82,5 +89,12 @@ lemma natCard_smul_set (a : G) (s : Set α) : Nat.card ↥(a • s) = Nat.card s
@[to_additive (attr := deprecated (since := "2024-09-30"))]
alias card_smul_set := Cardinal.mk_smul_set

@[to_additive (attr := simp)]
lemma encard_smul_set (a : G) (s : Set α) : (a • s).encard = s.encard := by
simp [encard, PartENat.card]

@[to_additive (attr := simp)]
lemma ncard_smul_set (a : G) (s : Set α) : (a • s).ncard = s.ncard := by simp [ncard]

end Group
end Set

0 comments on commit cc6b7ff

Please sign in to comment.