Prolog Program to reverse the List.

Prolog Program to reverse the List.

Program:

domains    
list=integer*

predicates
reverse(list,list).
append(list,list,list).

clauses
reverse([],[]).
reverse([H|T1],T2):-reverse(T1,T3),append(T3,[H],T2).
append([],L,L).
append([X|L1],L2,[X|L3]):-append(L1,L2,L3).

goal with output

goal: reverse([1,2,3,4],X)

output: X=[4,3,2,1]

           1 solution

Back | List Programs | Next