Main.hs example
cleanup