fact: Definition pack_add_test (G : pre_graph) (isG : is_graph G) x (Hx : x \in vset G) a : (pack G)[tst pack_v x <- a] ≃2 pack (G[adt x <- a]).
imports: Coq(Relation_Definitions Morphisms RelationClasses) mathcomp(all_ssreflect) GraphTheory(edone finite_quotient preliminaries bij equiv) GraphTheory(setoid_bigop structures pttdom mgraph mgraph2) GraphTheory(rewriting open_confluence finmap_plus)