End StandardRepresentation.
Arguments grepr0 {R gT G}.
Prenex Implicits dadd_grepr.
Section Char.
Variables (gT : finGroupType) (G : {group gT}).
Fact cfRepr_subproof n (rG : mx_representation algCF G n) :
is_class_fun <<G>> [ffun x => \tr (rG x) *+ (x \in G)].
Definition cfRepr n rG := Cfun 0 (@cfRepr_subproof n rG).

(* Specifications: *)
Lemma cfRepr1 n rG : @cfRepr n rG 1%g = n%:R.
Lemma cfRepr0 : cfRepr grepr0 = 0.
End StandardRepr.