ClassFieldTower.ProP.FiniteProPPresentation.infinite_of_gsPolynomial_nonpos
Published library source ↗Same source in NYLL ↗
theorem infinite_of_gsPolynomial_nonpos
(P : FiniteProPPresentation p d r sourceData G)
(ν : Fin r → ℕ)
(hν : ∀ i, P.RelatorZassenhausDepthAtLeast (ν i) i)
{t : ℝ} (ht0 : 0 ≤ t) (ht1 : t < 1)
(hpoly : 1 - (d : ℝ) * t + ∑ i : Fin r, t ^ ν i ≤ 0) :
Infinite GIn-scope Lean context
namespace ClassFieldTower.ProP
open ProCGroups
noncomputable section
universe u
namespace FiniteProPPresentation
variable {p d r : ℕ} [Fact p.Prime]
variable {sourceData :
FreeProC.EpimorphicallyFreeProCGroupOnConvergingSetData.{u, u}
(FiniteGroupClass.pGroup p)}
variable {G : Type u} [Group G] [TopologicalSpace G] [IsTopologicalGroup G]
variable [CompactSpace G] [T2Space G] [TotallyDisconnectedSpace G]Full declaration and proof
/-- A nonpositive weighted polynomial forces the target of an actual
finite presentation to be infinite. -/
theorem infinite_of_gsPolynomial_nonpos
(P : FiniteProPPresentation p d r sourceData G)
(ν : Fin r → ℕ)
(hν : ∀ i, P.RelatorZassenhausDepthAtLeast (ν i) i)
{t : ℝ} (ht0 : 0 ≤ t) (ht1 : t < 1)
(hpoly : 1 - (d : ℝ) * t + ∑ i : Fin r, t ^ ν i ≤ 0) :
Infinite G := by
by_contra hfinite
let : Finite G := Finite.of_not_infinite hfinite
exact (not_lt_of_ge hpoly) (P.finite_gsPolynomial_pos ν hν ht0 ht1)Source credits and license
Copyright (c) 2026 Naganori Yamaguchi (https://github.com/n-yamaguchi-0729). All rights reserved. Released under Apache 2.0 license as described in the file LICENSE. Authors: Naganori Yamaguchi (assisted by OpenAI Codex)