Add graph.lisp and add some functions to draw.lisp.