Arity Prolog. Вычеркнуть все буквы "о", стоящие в слове Х на четных местах

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

Arity Prolog. программа вычеркивания всех букв <<о>>, стоящих в слове Х на ченых местах. Помогите решить, на этой теме отболела и ни как не решить.

Решение задачи: «Arity Prolog. Вычеркнуть все буквы "о", стоящие в слове Х на четных местах»

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

run:- write('Введите строку...'), nl, read_line(0,X), nl, 
      write('Введенная строка*...'), write(X), nl, process(X,X).
      
process(X,X):- string_length(X,L), L < 2.
 
process(X,Y):- substring(X,1,1,'®'), !, substring(X,0,1,H), 
               string_length(X,L), TL is L-2, substring(X,2,TL,T),
               process(T,Z), concat(H,Z,Y).
               
process(X,Y):- substring(X,0,2,H), string_length(X,L), TL is L-2,
               substring(X,2,TL,T), process(T,Z), concat(H,Z,Y), write(Y).

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

Вход в систему: строка, введенная пользователем, сохраняется в переменной X.
Вывод на экран сообщения «Введенная строка*...», а затем самой строки.
Если длина строки нечетная (L=1), то процесс завершается. В случае, если длина строки четная (L=2), то выполняется запрос на ввод строки, содержащей только одну букву.
Полученная строка сохраняется в переменной Y.
Вывод на экран строки Y.