fact: Definition term_of_nterm (t: nterm) := match t with | nt_test alpha => elem_of alpha | nt_conn alpha u gamma => elem_of alpha · u · elem_of gamma end.
imports: HB(structures) Coq(Setoid Morphisms) mathcomp(all_ssreflect) GraphTheory(edone preliminaries setoid_bigop structures)