Итерация и побочный эффект - Lisp

Нужно создать итерационную функцию в которой будет стандартная функция с побочным эффектом. Как это будет выглядеть, помогите пожалуйста.

Листинг программы

(defun task ()
   (dotimes (i 10 t) (princ 'Ky-ky)))

Объяснение кода листинга программы

В данном коде определенная функция task, которая выполняет итерацию с помощью цикла dotimes. Список действий:

Определение функции task с помощью ключевого слова defun.
Использование цикла dotimes, который выполняет итерацию 10 раз.
Внутри цикла выводится значение переменной i с помощью функции princ, которая выводит текст на экран. Значение переменной i увеличивается на 1 после каждой итерации.
Значение переменной t используется в качестве аргумента для функции dotimes, чтобы указать, что итерация должна выполняться до тех пор, пока значение переменной i не станет равным 10.
Функция task завершается после выполнения всех итераций цикла. Список переменных:
i - переменная, которая итерируется от 0 до 9.
t - константа, которая используется в качестве аргумента для функции dotimes. Вывод: Ky-ky будет выведено на экран 10 раз.