Added a trivial Main.hs