fact: Definition split_tuple : (sum_num_occ ta k.+1).-tuple B -> (sum_num_occ ta k).-tuple B * N(enum_val k | ta).-tuple B.
imports: mathcomp(all_ssreflect ssralg ssrnum fingroup perm) Reals mathcomp(Rstruct) ssrR Reals_ext realType_ext ssr_ext ssralg_ext logb fdist entropy num_occ channel types