Изменение первых двух букв в слове с использованием пролога

Question

Я хочу написать предикат, который поменяет первые две буквы в атоме длиной два или более. Длина одного атома неизменна.
, например. ? - обмен (cat, X). X = действие; с использованием 'name'

Я не собираюсь это делать, может кто-нибудь мне помочь.

Можно ли перевести письмо в переменную и поменять ее на третью переменную, как в программировании 'C'?

кода следующим образом: -

interchange(X,[]). 
interchange(X,[H|T]):- swap([A,B],W). 
swap(X,Y):- name(X,[A,B|C])-> name(Y,[B,A|C]). 

я не был уверен, что с моей логикой. Я сделал то же самое, но не работал.

я получаю мое о/р, как:

23 - посоветуйтесь (inter_change). Предупреждение: обмен/2 переопределены Предупреждение: swap/2 переопределено true. 24? - обмен (кошка, X). X = []; X = [_VCTC | _VCTD]; сбой.

Answer 1

Вы прочитали документацию относительно analysis and construction of atoms.

Затем вы выбираете подходящий встроенный предикат и сказать что-то вроде:

swap_first_2(X , X) :- 
    nonvar(X) , 
    atom_codes(X , [_]) 
    . 
swap_first_2(X , Y) :- 
    nonvar(X) , 
    atom_codes(X,[A,B|C]) , 
    atom_codes(Y,[B,A|C]) 
    . 
swap_first_2(X , Y) :- 
    nonvar(Y) , 
    atom_codes(Y,[A,B|C]) , 
    atom_codes(X,[B,A|C]) 
    .