fact: Record t := mk { lcode0 :> Lcode0.t F n ; gen : {poly F} ; size_gen : size gen < n ; P : gen \in 'pgen[[set cw in lcode0]] }.
imports: mathcomp(all_ssreflect ssralg poly polydiv fingroup perm) mathcomp(finalg zmodp matrix mxalgebra mxpoly polydiv vector) ssralg_ext poly_ext f2 hamming linearcode dft