Update exercise-37.rkt