anchor.diff:    {:first-name "Elon"
      :last-name "Musk"
      :email "n/a"})
  -;; In: [:email] val: "n/a" fails spec: :my.domain/email at: [:email] 
  +;; In: [:email] val: "n/a" fails spec: :my.domain/email-type at: [:email] 
   ;;   predicate: (re-matches email-regex %)
   
   (s/explain :unq/person
  
positive.code: (s/explain :unq/person
             (->Person "Elon" nil nil nil))
  ;; In: [:last-name] val: nil fails spec: :my.domain/last-name at: [:last-name] predicate: string?
  ;; In: [:email] val: nil fails spec: :my.domain/email at: [:email] predicate: string?
  
  (s/conform :unq/person
    (->Person "Elon" "Musk" "elon@example.com" nil))
  
negative.code:   {::first-name "Elon"
     ::last-name "Musk"
     ::email "n/a"})
  ;; In: [:my.domain/email] val: "n/a" fails spec: :my.domain/email-type 
  ;;   at: [:my.domain/email] predicate: (re-matches email-regex %)
  ----
  
  