fact: Definition mx_discard' : 'M_(n - m, n) := @Syslcode.DIS [finFieldType of 'F_2] _ _ (leq_subr _ _).
imports: mathcomp(all_ssreflect ssralg fingroup finalg perm zmodp) mathcomp(matrix mxalgebra vector) mathcomp(Rstruct) realType_ext ssr_ext ssralg_ext f2 linearcode natbin ssrR hamming bigop_ext fdist proba channel channel_code decoding binary_symmetric_channel