Update teapot.rkt