Implementation of the Poem language in Racket