proposition: Lemma syms_symh_partdom_int mu : 's[mu] = 'h[mu] + \sum_(la | (mu < la :> 'PDom_d)%O) KostkaInv la mu *: 'h[la] :> SF.
proof: Proof. rewrite -(unitrig_sum1r (fun la : 'PDom_d => 'h[la]) mu (KostkaInv_unitrig d)). by rewrite -syms_symh_int. Qed.
imports: HB(structures) mathcomp(all_ssreflect) mathcomp(ssralg ssrint fingroup perm) mathcomp(ssrcomplements freeg mpoly) sorted tools ordtype permuted partition skewpart composition Yamanouchi std tableau stdtab skewtab permcent antisym Schur_mpoly therule Schur_altdef unitriginv