fact: Definition weighted_count {T} (p : pred T) (s : seq (T * K)) : K := \sum_(xw <- s | p xw.1) xw.2.
imports: mathcomp(all_ssreflect ssralg fingroup zmodp poly ssrnum) mathcomp(matrix perm) ssr_ext ssralg_ext fdist subgraph_partition tanner