Instance CompSpecs : compspecs.Definition Vprog : varspecs.Definition tnode := Tstruct _node noattr.Definition node gsh1 gsh2 := HORec (node_fun gsh1 gsh2).

Lemma node_eq' : forall gsh1 gsh2, node gsh1 gsh2 = node_fun gsh1 gsh2 (node gsh1 gsh2).