fact: Definition code := [qualify a c : seq nat | all (fun i => nth 0 c i <= i) (iota 0 (size c)) ].
imports: HB(structures) mathcomp(all_ssreflect) mathcomp(fingroup perm morphism presentation) mathcomp(ssralg poly ssrint) permcomp tools permuted combclass congr