End Fitting.
Section FittingFun.
Implicit Types gT rT : finGroupType.

(* Specifications: *)
Lemma morphim_Fitting : GFunctor.pcontinuous (@Fitting).
Lemma FittingS gT (G H : {group gT}) : H \subset G -> H :&: 'F(G) \subset 'F(H).
Lemma FittingJ gT (G : {group gT}) x : 'F(G :^ x) = 'F(G) :^ x.
End FittingFun.