Desenvolver um programa em Prolog que inverta os elementos de uma lista, como no exemplo a seguir.
?- reverso([a, b, c, d], Lista), write(Lista), nl. [d,c,b,a]