EtaleFundamentalGroups.Kummer.isUnit_natCard_of_injective_pi_zmod
The order of a finite additive group embedded in a product of Kummer cyclic groups is a unit whenever all Kummer exponents are units.
AddSubgroup.card_dvd_of_injective is the range-plus-Lagrange step; the cardinality of the target is then computed coordinatewise.
Source context 3 commands
Surrounding namespaces, section variables, and local commands at this declaration.
namespace EtaleFundamentalGroups.Kummer
open scoped BigOperators
universe uR uI uNLean source · statement
theorem isUnit_natCard_of_injective_pi_zmod
{R : Type uR} [CommSemiring R]
{I : Type uI} [Finite I] (n : I → ℕ)
{N : Type uN} [AddGroup N] [Finite N]
(χ : N →+ ∀ i, ZMod (n i)) (hχ : Function.Injective χ)
(hnUnit : ∀ i, IsUnit (n i : R)) :
IsUnit (Nat.card N : R)