Arguments metacyclic {gT} A%g.
Arguments metacyclicP {gT A}.
(* Automorphisms of cyclic groups. *)
Section CyclicAutomorphism.
Variable gT : finGroupType.
Section CycleAutomorphism.
Variable a : gT.
Section CycleMorphism.
Variable n : nat.
Definition cyclem of gT := fun x : gT => x ^+ n.

(* Specifications: *)
Lemma cyclemM : {in <[a]> & , {morph cyclem a : x y / x * y}}.
Canonical cyclem_morphism := Morphism cyclemM.