fact: Fixpoint insrow r l : seq T := if r is l0 :: r then if (l < l0)%O then l :: r else l0 :: (insrow r l) else [:: l].
imports: HB(structures) mathcomp(all_ssreflect) mathcomp(perm fingroup) tools partition Yamanouchi ordtype subseq tableau std stdtab