Module `Email_message__.Email_address1`

module Domain : sig ... end

include module type of sig ... end with module Domain := Email_address.Domain

module Domain = Email_address.Domain

type t = Email_address.t

val sexp_of_t : t -> Ppx_sexp_conv_lib.Sexp.t
val create : ?⁠prefix:string -> ?⁠domain:Domain.t -> string -> t
val of_string : ?⁠default_domain:string -> string -> t Core_kernel.Or_error.t
val of_string_exn : ?⁠default_domain:string -> string -> t
val list_of_string : ?⁠default_domain:string -> string -> t list Core_kernel.Or_error.t
val list_of_string_exn : ?⁠default_domain:string -> string -> t list
val to_string : t -> string
val list_to_header_value : t list -> string
val local_part : t -> string
val set_local_part : t -> string -> t
val domain : t -> Domain.t option
val set_domain : t -> Domain.t option -> t
val address_part : ?⁠brackets:bool -> ?⁠lowercase_domain:bool -> t -> t
val address_part_string : ?⁠brackets:bool -> ?⁠lowercase_domain:bool -> t -> string
val set_address_part : t -> string -> t Core_kernel.Or_error.t
val prefix : t -> string option
val set_prefix : t -> string option -> t
val (>=) : t -> t -> bool
val (<=) : t -> t -> bool
val (=) : t -> t -> bool
val (>) : t -> t -> bool
val (<) : t -> t -> bool
val (<>) : t -> t -> bool
val equal : t -> t -> bool
val min : t -> t -> t
val max : t -> t -> t
val ascending : t -> t -> int
val descending : t -> t -> int
val between : t -> low:t -> high:t -> bool
val clamp_exn : t -> min:t -> max:t -> t
val clamp : t -> min:t -> max:t -> t Base.Or_error.t

type comparator_witness = Email_address.comparator_witness

val comparator : (t, comparator_witness) Base.Comparator.comparator
val validate_lbound : min:t Base.Maybe_bound.t -> t Base.Validate.check
val validate_ubound : max:t Base.Maybe_bound.t -> t Base.Validate.check
val validate_bound : min:t Base.Maybe_bound.t -> max:t Base.Maybe_bound.t -> t Base.Validate.check

module Replace_polymorphic_compare = Email_address.Replace_polymorphic_compare

module Map = Email_address.Map

module Set = Email_address.Set

val compare : t -> t -> Core_kernel__.Import.int
val hash_fold_t : Base.Hash.state -> t -> Base.Hash.state
val hash : t -> Base.Hash.hash_value
val hashable : t Core_kernel.Hashtbl.Hashable.t

module Table = Email_address.Table

module Hash_set = Email_address.Hash_set

module Hash_queue = Email_address.Hash_queue

module Caseless = Email_address.Caseless

module Stable = Email_address.Stable

val local_address : unit -> t