Section GringMx.
Variables (n : nat) (rG : mx_representation F G n).
Hypothesis F'G : [char F]^'.-group G.
End GringMx.
Definition gset_mx (A : {set gT}) := \sum_(x in A) aG x.
Local Notation tG := #|pred_of_set (classes (gval G))|.
Definition classg_base := \matrix_(k < tG) mxvec (gset_mx (enum_val k)).
Let groupCl : {in G, forall x, {subset x ^: G <= G}}.

Lemma classg_base_center : (classg_base :=: 'Z(R_G))%MS.