fact: Hypotheses (to1 : to^~ 1 =1 id) (toM : forall x, act_morph to x).
imports: mathcomp(ssreflect ssrbool ssrfun eqtype ssrnat div seq) mathcomp(fintype bigop finset fingroup morphism perm) mathcomp(automorphism quotient)