proposition: Lemma yamrowP : is_yam_of_eval (intpart_of_intpartn (rowpartn d2)) (ncons d2 0%N [::]).
proof: Proof. Proof using . rewrite /is_yam_of_eval; elim: d2 => [|d]; rewrite /= !rowpartnE //. by move=> /andP[/= -> /eqP ->]; case: d => /=. Qed.
imports: HB(structures) mathcomp(all_ssreflect) mathcomp(ssralg) mathcomp(mpoly) tools ordcast combclass partition skewpart Yamanouchi ordtype std tableau stdtab Schensted congr plactic Greene_inv stdplact Yam_plact skewtab shuffle Schur_mpoly freeSchur