Create problem1.hs