Section PermIn.
Variables (T : finType) (A : {set T}) (f : T -> T).
Hypotheses (injf : {in A &, injective f}) (sBf : f @: A \subset A).
Definition perm_in := perm perm_in_inj.
Hypothesis Gf : f @* G = G.

Lemma aut_closed : f @: G \subset G.