fact: Definition extractpred n (wt : n.-tuple Alph) (P : pred 'I_n) := [seq tnth wt i | i <- enum P].
imports: mathcomp(all_ssreflect) mathcomp(perm) sorted tools subseq partition tableau Schensted congr plactic ordcast ordtype