End PrimitiveRoots.
(***********************************************************************)
(*  Cycles of prime order                                              *)
(***********************************************************************)
Section AutPrime.
Variable gT : finGroupType.

(* Specifications: *)
Lemma Aut_prime_cycle_cyclic (a : gT) : prime #[a] -> cyclic (Aut <[a]>).
Lemma Aut_prime_cyclic (G : {group gT}) : prime #|G| -> cyclic (Aut G).
End AutPrime.