fact: Definition tree_like := [forall n : 'I_(#|port|*4), [forall p : n.+1.-tuple _, ~~ ucycleb graph_rel p]].
imports: mathcomp(all_ssreflect ssralg fingroup zmodp poly ssrnum) mathcomp(matrix perm) ssr_ext ssralg_ext fdist subgraph_partition tanner