(defclass point ()
  ((x
     :initarg :x
     :initform 0
     :reader get_x
     :accessor set_x
     :documentation "The value of the X axis")
   (y
     :initarg :y
     :initform 0
     :reader get_y
     :accessor set_y
     :documentation "The value of the Y axis")
   (z
     :initarg :z
     :initform 0
     :reader get_z
     :accessor set_z
     :documentation "The value of the Z axis")))


(defgeneric draw (point)
        (:documentation "Draw the pixel at the selected coords."))

;; (defmethod draw ((point p1)) (format t "You are at p1 draw function"))
;; (defmethod draw ((point p2)) (format t "You are at p2 draw function"))