Corollary known_node : forall gsh1 gsh2 nodes1 rep p nodes2,
  known_nodes gsh1 gsh2 (nodes1 ++ (p, rep) :: nodes2) =
  node' gsh1 gsh2 rep p * known_nodes gsh1 gsh2 (nodes1 ++ nodes2).Instance EqDec_node_rep : EqDec node_rep.Instance EqDec_node : EqDec (val * node_rep).

Lemma body_locate : semax_body Vprog Gprog f_locate locate_spec.