Лисп 3 ЗАДАНИЯ

Рекурсия. В теле функции использование операторов set и setq не допускается! Все функции должны быть рекурсивными, функционалы не использовать
Задания:
1)Преобразующую список в "двойной" список таким образом, чтобы каждый элемент удвоился. Например, (1 a b 3) –> (1 1 a a b b 3 3).
2)Определите функцию:Возвращающую объединение двух множеств
3)Определите функционал:Заменяющий все элементы списка, не обладающие определенным свойством, на символ *. Проверьте работу функционала для предикатов: - число (функциональный аргумент – имя встроенного предиката numberp); - отрицательное число (функциональный аргумент – лямбда выражение).