Problem 21.hs Submission