(let* [[x (read)][y (read)]] (print (cond [(= x y) 0] [(zero? (+ x y)) 3] [(zero? y) 1] [(zero? x) 2] [else -1])))