ran into a surprise with s/or just now

;; `s/or` destructures the value that the second pred sees
(let [spec (s/and (s/or :even even? :small #(> 10 %))
                  #(= 5 %))]
  (s/explain-str spec 5))
;; => "[:small 5] - failed: (= 5 %)\n"

;; flipped order of arguments to `s/and
(let [spec (s/and #(= 5 %)
                  (s/or :even even? :small #(> 10 %)))]
  (s/explain-str spec 5))
;; => "Success!\n"