Criar lista em Prolog
criarLista(X, R) :- criarLista(X, [], R). criarLista(2, L, R) :- R = '.'(2,L), !. criarLista(X, L, R) :- T = '.'(X, L), Xn is X -1, criarLista(Xn, T, R).