|| Diese Modul stellt einige einfache Routinen zur 
|| Ein/Ausgabe zur Verfuegung. 


|| Typdefinitionen

teinstream  == [char]    
tausstream  == [char]
teinzeichen == char



|| Eingegebenes Zeichen holen

eingabe :: teinstream -> teinzeichen

eingabe stream
= force (hd stream) 



|| Zeichen bis zum naechsten Return wegwerfen

rest    :: teinstream -> teinstream

rest (('\n'): stream)
= stream

rest stream 
= rest (tl stream)