:- phrase(list(Es), Xs0,Xs).
:- phrase(list(Es), Es,Es).
< @@	% Es = [].
< @@	! Ausführung dauert zu lang, Antwort unvollständig
< Why the loop here?
list([]) -->
	[].
list([E|Es]) -->
	[E],
	list(Es).
--**- 18.Bsp. n599 ------------------------
Questions to the lecturer are lines beginning with <. We have also included the error messages in the questions simply by adding <s.

Compared to electronic mail the context of a question remains evident. You do not need to tell where you are (which example), you do not need to copy parts of the program into the message. You simply annotate the program.
**NEXT:Send the question pressing [DO].

[logprog|GUPU|UWN]