proposition: Lemma ucn_sub gT (G : {group gT}) : 'Z_n(G) \subset G.
proof: Proof. by have [hZ ->] := ucn_pmap; apply: gFsub. Qed.
imports: mathcomp(ssreflect ssrbool ssrfun eqtype ssrnat seq path) mathcomp(fintype div bigop prime finset fingroup morphism) mathcomp(automorphism quotient commutator gproduct) mathcomp(gfunctor center gseries cyclic)