auth-registry-v6

(define-map verified-users
  principal
  bool
)

(define-public (add-user (user principal))
  (begin
    (asserts! (not (is-eq user tx-sender)) (err u1))
    (map-set verified-users user true)
    (ok true)
  )
)

(define-read-only (is-verified (user principal))
  (ok (default-to false (map-get? verified-users user)))
)