Falci
6/4/2014 - 4:40 PM

Criar lista em Prolog

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).