Тут приведу пример функций, нужно использовать defun (define function) это такое макро в языке LISP. Сейчас покажу 2 примера:
Пример 1, напишим код, функция _print считывает из параметра _t и выводит строку на экран:

(defun _print(_t) (format t "~s" _t))
 (_print "Первая функция")

Результат:

"Первая функция"
NIL

Пример 2, напишим такой код, функция _add складывает 2 параметра a и b и выводит на экран сумму:

(defun _add(a b) (+ a b))
(_add 2 3)

Результат:

5