Удаление предпоследнего элемента - Prolog

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

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

Решение задачи: «Удаление предпоследнего элемента»

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

domains
int=integer
intl=int*
 
predicates
del_plast(intl,intl)
 
clauses
del_plast([],_) :- fail.
del_plast([_,Y],[Y]) :- !.
del_plast([X|T],[X|R]) :- del_plast(T,R).

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

domains - определения типов данных для переменных. В данном случае, int это целочисленный тип данных, а intl это указатель на массив целочисленных значений.
predicates - определение пользовательской функции с именем del_plast, которая принимает два аргумента типа intl.
clauses - определение правил или условий для функции del_plast.
- Первое правило: если первый аргумент пуст ([]), то возвращается ошибка (fail).
- Второе правило: если второй аргумент равен первому (Y), то возвращается пустой список ([]) без изменений.
- Третье правило: если первый аргумент содержит элементы, то рекурсивно вызывается функция del_plast для оставшейся части списка (T) и результат присваивается второму аргументу (R). Таким образом, данный код представляет собой простую реализацию удаления предпоследнего элемента из списка в языке программирования Prolog.