End Similarity.
Section Socle.
Variables (gT : finGroupType) (G : {group gT}).
Variables (n : nat) (rG : mx_representation F G n) (sG : socleType rG).

(* Specifications: *)
Lemma socle_irr (W : sG) : mx_irreducible (socle_repr W).
Local Notation mG U := (mxmodule rG U).