Я печатаю треугольник чисел в Лиспе и хочу убедиться, что входные данные при вызове функции являются целыми числами.Если это строка или десятичная дробь, она должна вернуть сообщение, не принимая входные данные.Это мой код для чисел.
(defun nested-loop (n)
(loop for i from 1 to n doing
(loop for j from 1 to i collecting
(progn
(prin1 j)))
(format t "~%")))
(nested-loop 5)