Update Exercise 15.31.r