(* Specifications: *)
Lemma rstab_group_set : group_set rstab.
Lemma groupC : group_closure_field algCF gT.
Lemma trow0 n1 m2 n2 B : @trow n1 0 m2 n2 B = 0.
Qed.
Proof. by move=> sGD; rewrite !irrEch
Definition dprodl_Iirr i := cfIirr (cfDprodl KxH 'chi
Lemma dprodl_IirrK : cancel dprodl_Iirr
Definition dprodr_Iirr j := cfIirr (cfDprodr KxH 'chi
Lemma dprodr_IirrK : cancel dprodr_Iirr
rewrite -cfdot_irr !dprod_IirrE cfdot_dpro
Proof.
Lemma VectFinMixin (R : finRingType) (vT : vectType R) : Finite.mixin_of vT.
Lemma splittingFieldForS (K M E : {subfield L}) p : (K <= M)%VS -> (M <= E)%VS -> splittingFieldFor K p E -> splittingFieldFor M p E.
Lemma BaseMixin : Vector.mixin_of A -> GRing.UnitRing.mixin_of A.
Lemma edivnP m d : edivn_spec m d (edivn m d).
Lemma edivn_eq d q r : r < d -> edivn (q * d + r) d = (q, r).
Lemma edivn2P n : edivn_spec n 2 (edivn2 0 n).
Lemma decodeK : cancel decode code.
Lemma codeK : cancel code decode.
Lemma ltn_code s : all (fun j => j < code s) s.
Lemma gtn_decode n : all (ltn^~ n) (decode n).
Lemma seq_of_optK : cancel seq_of_opt ohead.