Update ch2.2.4.rkt