proposition: Lemma alpha_beta_tag_of_id k (i : ord_of_kind m n' k) : alpha_beta (tag_of_kind rW k i) = alpha_beta (tag_of_id rW (id_of_kind k i)).
proof: Proof. by destruct k. Qed.
imports: Wf_nat Init.Wf Recdef Reals mathcomp(all_ssreflect perm zmodp matrix ssralg) mathcomp(Rstruct) ssrR Reals_ext ssr_ext ssralg_ext bigop_ext f2 fdist channel pproba linearcode subgraph_partition tanner tanner_partition summary ldpc checksum ldpc_algo