proposition: Lemma Aut_cycle_abelian : abelian (Aut <[a]>).
proof: Proof. by rewrite -im_Zp_unitm morphim_abelian ?units_Zp_abelian. Qed.
imports: HB(structures) mathcomp(ssreflect ssrbool ssrfun eqtype ssrnat seq choice div) mathcomp(fintype bigop prime finset fingroup morphism) mathcomp(perm automorphism quotient gproduct ssralg) mathcomp(finalg zmodp poly)