let free (n : node) : bool = 
  Hashtbl.length (n.inb) == 0