Add racket solution to Q001