   (is (match? inc ; not normally considered a predicate, but used as one here
               1)))
 
-(deftest equals-overrides-predicate-test
-  (is (match? (m/equals even?)
-              even?)))
-
 ;;;; ___________________________________________________________________________
 ;;;; ---- Maps ----
 

(deftest predicates-for-map-values-test
  (is (match? {:a even?}
              {:a 1234})))

(deftest predicates-within-equals-test
  (is (match? (m/equals {:a 1 :b even?})
              {:a 1 :b 1234})))

;;;; ___________________________________________________________________________
;;;; ---- Sequences ----

              1234)) ; TODO: I guess we need this in contexts where `even?` would not be treated as a pred -- but what are those contexts?
  )

(deftest equals-overrides-predicate-test
  (is (match? (m/equals even?)
              even?)))

(deftest equals-overrides-map-embeds-test
  (testing "Use m/equals for exact match"
    (is (match? (m/equals {:a 1 :b 2})
                {:a 1 :b 2}))
    (is (match? (m/mismatch ; see ++use-of-mismatch++ at top of file
                 (m/equals {:a 1}))
                {:a 1 :b 2}))))

(deftest predicates-within-equals-test
  (is (match? (m/equals {:a 1 :b even?})
              {:a 1 :b 1234})))

(deftest WIP-embeds-test ; TODO
  (is (match? (m/embeds [1 3 5])
              [1 2 3 4 5])))
