Create problem97.hs