fact: Fixpoint remn_rec t n := if t is t0 :: t' then match t0 with | [::] => [::] | l0 :: t0' => if last l0 t0' == n then if t0' == [::] then [::] else (belast l0 t0') :: t' else t0 :: remn_rec t' n end else [::] .
imports: HB(structures) mathcomp(all_ssreflect) mathcomp(perm fingroup) tools combclass partition Yamanouchi ordtype std tableau