Пожалуйста откликнитесь, не могу разобраться! - Lisp

Формулировка задачи:

Требуется определить рекурсивную функцию, которая по заданным вещественному x и целому n, вычисляет величину x^n согласно формуле. Решение не должно содержать &optional, initional element, а должно быть максимально просто выполнено с помощью рекурсии. Также хотелось бы, чтоб были комментарии. Пожалуйста помогите!!!

Решение задачи: «Пожалуйста откликнитесь, не могу разобраться!»

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

(defun pow (x n)
  (if (zerop n) 1 (if (plusp n) (* x (pow x (- n 1))) (/ 1 (pow x (- n))))))

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

В данном коде определен функциoн с именем pow, который принимает два аргумента — x и n. Внутри функции происходит проверка условия n, и в зависимости от его значения выполняются определенные действия:

Если n равно нулю, то возвращается значение 1.
Если n больше нуля, то выполняется рекурсивный вызов функции pow с аргументами x и n-1, и результат умножается на x.
Если n меньше нуля, то выполняется рекурсивный вызов функции pow с аргументами x и -n, и результат делится на 1. Таким образом, данный код реализует рекурсивную функцию для вычисления x в степени n.