:- phrase(list(Es), Xs0,Xs).
@@	%  Es = [], Xs0 = Xs.
@@	%  Es = [_A], Xs0 = [_A|Xs].
@@	%  Es = [_A,_B], Xs0 = [_A,_B|Xs].
@@	%  Es = [_A,_B,_C], Xs0 = [_A,_B,_C|Xs].
@@	%  Es = [_A,_B,_C,_D], Xs0 = [_A,_B,_C,_D|Xs].
@@	? Weitere Lösungen mit SPACE
:- phrase(list(Es), Es,Es).
list([]) -->
	[].
list([E|Es]) -->
	[E],
	list(Es).
-----         n599 ------------------------

Ask for more with .