fact: Definition enum_box_skew := [seq (r, c) | r <- iota 0 (size outer), c <- iota (nth 0 inner r) (nth 0 outer r - nth 0 inner r)].
imports: HB(structures) mathcomp(all_ssreflect) mathcomp(div ssralg ssrint ssrnum binomial) tools combclass sorted ordtype