(display (if (= (read) 1) 0 1))
(newline)