fact: Definition sbound_f' k (H : k.-1 <= n) := fun c : 'rV[F]_n => \row_(i < k.-1) c ord0 (widen_ord H i).
imports: mathcomp(all_ssreflect ssralg poly polydiv fingroup perm) mathcomp(finalg zmodp matrix mxalgebra mxpoly vector) ssr_ext ssralg_ext poly_ext f2 hamming decoding channel_code