* graph-dot.lisp: Hacking to-dot
* graph-dot.lisp: Finished adding a :node-color argument to to-dot and to-dot-file.
clean up node-to-dot
refactor node-to-dot and edge-to-dot

  Replace conditional logic with local functions which more closely
  match the desired semantics.
* graph.lisp: levels returns two values