(import (scheme base)
        (scheme read))

(write `(read ,(+ 1 2 3)))