Исправление zinfandel, 01.10.14 10:11 (текущая версия) :
Я на днях вот такое открытие сделал.
main = interact (show . go)
Edit: s/iterate/interact/
Исходная версия zinfandel, 01.10.14 10:09:
main = iterate (show . go)