append([], Lista, Lista).
append([Cabeza | Cola], Lista,[Cabeza | ColaResultado]) :- append(Cola, Lista, ColaResultado).