Add the graph draing code from Land of Lisp