Racket code for 4/1.