Недавно начал изучать Лисп,естественно первые шаги - это садовая дорожка.

:   Convert angle in degrees to radians
(defun dtr (a)
          (*pi (/ a 180.0))
)
|  :Acquire information for garden path
|  (defun gpuser () )
|  (setq sp (getpoint "\nStart point of path:"))
|  (setq ep (getpoint "\nEnd point of path:"))
|  (setq hwidth (getdist "\nHalf width of path:"sp))
|  (setq trad (getdist "\nRadius of tiles:"sp))
|  (setq pangle (angle sp ep ))
|  (setq plength (distance sp ep ))
|  (setq width (' 2 hwidth))
|  (setq angp90 (+pangle (dtr 90)))  : Path angle +90 deg
|  (setq angm90 (-pangle (dtr 90)))  : Path angle -90 deg

ошибка - неверный синтаксис DEFUN: (GPUSER (nil))
Не пойму что надо исправить

тело функции-то где?
говорит что лишний скобка