proposition: Lemma inj_enc_not_typ : injective enc_not_typ.
proof: Proof. by move=> a1 a2 /enum_val_inj [] /ord_inj/enum_rank_inj. Qed.
imports: mathcomp(all_ssreflect ssralg matrix) Reals Lra mathcomp(Rstruct) ssrR Reals_ext realType_ext logb ssr_ext ssralg_ext bigop_ext fdist proba entropy aep typ_seq natbin source_code