(defun net-search (start finish &optional (queue (list (list start))))
  queue
  )