Committed first Racket solution