(let((f"(let((f~S))(format t f f))"))(format t f f))