Update Exercise 15.46.r