最近开始学习lisp，然后遇到一个题目是输入一个正整数然后显示相同数量的句子

然后我是这样写的
(defun point(x)
((do (( y 0 (1+ y)))
((> y x ) )
(format t "print un point~a ~%" y))))

但是运行的时候系统提示
Error: TYPE-ERROR :DATUM (DO ((Y 0 #)) ((> Y X)) ...) :EXPECTED-TYPE FUNCTION
Fast links are on: do (si::use-fast-links nil) for debugging
Signalled by POINT.
TYPE-ERROR :DATUM (DO ((Y 0 #)) ((> Y X)) ...) :EXPECTED-TYPE FUNCTION
不知道是什么原因导致的，有没有大佬知道我的问题在哪里呢

你的do外面是不是多加了一对括号？