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 ... )))