consider cleanup in Main.hs