Solved Problem 17, Scheme