在Prolog中加入不同大小的谓词

Question

我正在尝试用SWI-Prolog编写程序。 我有一个将英语单词转换为西班牙语的谓词。

listtran([],[]). 
listtran([Head|Tail],[Trans|Spanish]) :-
   diccionario(Head,Trans),
   listtran(Tail,Spanish).

我有一个谓词验证句子结构。

sentence(W1,W2,W3) :-
   word(noun,W1),
   word(verb,W2),
   word(adjective,W3).

现在我想加入他们同一个谓词，任何想法？

Answer 1

translatedsentence(W1,W2,W3) :-
   sentence(V1,V2,V3),
   listtran([V1,V2,V3], [W1,W2,W3]).