fact: Definition build_traces l := [set (pn,seqs) | pn in {set port}, seqs in dest_ports_seqs def_port (start_graph pn) l].
imports: mathcomp(all_ssreflect ssralg fingroup zmodp poly ssrnum) mathcomp(matrix perm) ssr_ext ssralg_ext fdist subgraph_partition tanner