Как объединить все не-числа в список в Прологе?

#prolog Вопрос: У меня есть базовый вариант variable_part(X) :- var(X), !. variable_part(X) :- number(X). variable_part(X Y) :- variable_part(X), variable_part(Y). variable_part(X-Y) :- variable_part(X), variable_part(Y). Я пытаюсь сделать так, чтобы все элементы…