Improve rastache partiam using Racket get-output-port