proposition: Lemma omegasf_prodsyme la : head 0%N la <= n -> omegasf 'e[la] = 'h[la].
proof: Proof. move=> Hhead. rewrite /prod_syme /prod_symh /prod_gen rmorph_prod /=. apply eq_big_seq => /= i /intpartn_leq_head/leq_trans/(_ Hhead). exact: omegasf_syme. 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