(use scheme.sort) (define yuki2024 (let* ((n (read)) (x (read)) (an (make-vector n)) (k= (vector-ref an i) (logxor (vector-ref an (+ i 1)) x)) (display "No\n")) ((<= (vector-ref an (+ i 1)) (logxor (vector-ref an i) x)) (display "No\n")) (else (loop (+ i 1)))))))