Function: FIND-MIN-NODE

Source

(defun find-min-node (node)
  (if-bind left (left node)
	   (find-min-node left)
	   node))