(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)) (loop #f (+ i 1))) ((<= (vector-ref an (+ i 1)) (logxor (vector-ref an i) x)) (loop #f (+ i 1))) (else (loop #t (+ i 1))))))))