Prolog - 谓词排序和合并列表

Question

您好我正在尝试编写一个谓词，将第一个列表从低到高排序，第二个列表从高到低排序，然后将每个列表的头部放入一个新列表。

Answer 1

这里是mix/3谓词的代码：

mix([],[],[]).
mix([],[H1|T1],[H1|T2]):-
    mix([],T1,T2).
mix([H1|T1],[],[H1|T2]):-
    mix(T1,[],T2).
mix([H1|T1],[H2|T2],[H1,H2|T3]) :-
   mix(T1,T2,T3).

这个也适用于不同长度的输入列表。