fact: Definition pred_LRtriple_fast (t1 t2 : seq (seq nat)) := [pred t : (seq (seq nat)) | has (fun p2 => to_word t \in shsh (to_word t1) p2) (RSclass _ t2)].
imports: mathcomp.ssreflect.ssreflect mathcomp(ssrbool ssrfun ssrnat eqtype finfun fintype choice) mathcomp(order seq tuple finset perm binomial bigop) tools vectNK subseq partition Yamanouchi ordtype std tableau stdtab Schensted plactic Greene_inv stdplact