(define x")(display\"(define x\")(write x)(print x)")(display"(define x")(write x)(print x)