LISP изменить коды

Изменить готовые коды( чтобы не было плагиачено или может переделать под свой код) + добавить комментарии с пояснениями
Lisp - ЯП
1. Дерево представлено многоуровневым списком произвольного вида. Найти глубину дерева
2. Реализовать функционал, который сравнивает два многоуровневых списка поэлементно на основе заданного предиката и возвращает результат в виде значения истина или ложь 3.Решить первую задачу с использованием встроенных или определенных самостоятельно функционалов