Update exercise-98.rkt