Desenvolver um programa em Prolog que apresente os elementos contidos em uma lista em dobro, como no exemplo a seguir.
?- dobro([1, 2, 3, 4, 5], Lista), write(Lista), nl. [2,4,6,8,10]