fact: Definition linvseq s := [fun t => all (fun i => nth (size s) t (nth (size t) s i) == i) (iota 0 (size s))].
imports: HB(structures) mathcomp(all_ssreflect) mathcomp(perm fingroup) tools combclass ordtype permcomp