Now we are nearly ready to print the whole graph.
The function to print the graph with the proper labels follows the outline we created earlier (see A Graph with Labeled Axes), but with additions.
Here is the outline:
(defun print-graph (numbers-list) "documentation…" (let ((height … …))
(print-Y-axis height … ) (graph-body-print numbers-list) (print-X-axis … )))