# node_label() returns the label for a particular node
subroutine(node_label(string thenode),
  if (node_exists(thenode . ".label")) then
    $(thenode . ".label")
  else
    "NO LABEL: " . node_name(thenode)
);