Create GeneratePosts.hs