fact: Definition tgraph_of_term: term -> tgraph2 := pttdom.eval (fun a: A => g2_var _ (pttdom.tm_var a)).
imports: HB(structures) Coq(Setoid Morphisms) mathcomp(all_ssreflect) GraphTheory(edone finite_quotient preliminaries bij equiv) GraphTheory(setoid_bigop structures pttdom mgraph mgraph2 rewriting)