aboutsummaryrefslogtreecommitdiff
path: root/mathcomp/solvable/nilpotent.v
diff options
context:
space:
mode:
authorCyril Cohen2020-11-19 18:33:21 +0100
committerCyril Cohen2020-11-19 21:38:46 +0100
commite565f8d9bebd4fd681c34086d5448dbaebc11976 (patch)
tree3e74907bf8e310b6400b7c340357ad44fc44a83f /mathcomp/solvable/nilpotent.v
parent0dbefe01e54a467b7932a514355f0435b4cfb978 (diff)
Removing duplicate clears and turning the warning into an error
Diffstat (limited to 'mathcomp/solvable/nilpotent.v')
-rw-r--r--mathcomp/solvable/nilpotent.v2
1 files changed, 1 insertions, 1 deletions
diff --git a/mathcomp/solvable/nilpotent.v b/mathcomp/solvable/nilpotent.v
index 06f3152..cf6503a 100644
--- a/mathcomp/solvable/nilpotent.v
+++ b/mathcomp/solvable/nilpotent.v
@@ -424,7 +424,7 @@ have <-: 'Z(H / Z) * 'Z(K / Z) = 'Z(G / Z).
by rewrite -mulHK quotientMl // center_prod ?quotient_cents.
have ZquoZ (B A : {group gT}):
B \subset 'C(A) -> 'Z_n(A) * 'Z_n(B) = Z -> 'Z(A / Z) = 'Z_n.+1(A) / Z.
-- move=> cAB {defZ}defZ; have cAZnB: 'Z_n(B) \subset 'C(A) := gFsub_trans _ cAB.
+- move=> cAB {}defZ; have cAZnB: 'Z_n(B) \subset 'C(A) := gFsub_trans _ cAB.
have /second_isom[/=]: A \subset 'N(Z).
by rewrite -defZ normsM ?gFnorm ?cents_norm // centsC.
suffices ->: Z :&: A = 'Z_n(A).