Main.hs module - done.
/Y.