(define x 5)
cond((< x 6) set x 7)
(display x)