A pretty printing script for s-expressions in Racket