Нечетная длина элементов списка - Prolog

Что не так,я не пойму? %1)Определить предикаты "чет" и "нечет" определяющие чётность и нечётность длины списка (предикат "длина" не использовать).

%odd_list(spisok).
odd_list([],Temp):-Temp mod 2=0.
odd_list([_|T],Temp):-odd_list(T,Temp1),Temp is Temp1+1.

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

process([], <некоторая константа>).
process([H|T], R) :-
    process(T, RT),
    R is <некоторые действия с H и RT>.

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

process([], <некоторая константа>) - если список пустой, то выполняется некоторая константа
process([H|T], R) :- - если в списке есть элементы, то выполняется следующее:
- process(T, RT), - рекурсивный вызов функции process для оставшихся элементов списка
- R is <некоторые действия с H и RT> - результат выполнения функции process присваивается переменной R. Здесь могут быть произведены некоторые действия с элементом H и результатом рекурсивного вызова функции process (RT).