`module Mimetype : sig ... end`
`type attachment_name``= string```
`module Attachment : sig ... end`
`module Content : sig ... end`
`type t``= Email_message.Email.t```
`include sig ... end`
`val sexp_of_t : t ‑> Base.Sexp.t`
`val create : ?⁠from:Email_address.t ‑> to_:Email_address.t list ‑> ?⁠cc:Email_address.t list ‑> ?⁠reply_to:Email_address.t list ‑> subject:string ‑> ?⁠id:string ‑> ?⁠in_reply_to:string ‑> ?⁠date:Core.Time.t ‑> ?⁠auto_generated:unit ‑> ?⁠extra_headers:(Email_message__.Headers.Name.t * Email_message__.Headers.Value.t) list ‑> ?⁠attachments:(attachment_name * Content.t) list ‑> Content.t ‑> t`
`val from : t ‑> Email_address.t option`
`val to_ : t ‑> Email_address.t list option`
`val cc : t ‑> Email_address.t list option`
`val subject : t ‑> string option`
`val id : t ‑> string option`
`val all_attachments : t ‑> Attachment.t list`
`val find_attachment : t ‑> attachment_name ‑> Attachment.t option`
`val all_related_parts : t ‑> (attachment_name * Content.t) list`
`val find_related : t ‑> attachment_name ‑> Content.t option`
`val inline_parts : t ‑> Content.t list`
`val map_file_attachments : t ‑> f:(Attachment.t ‑> [ `Keep | `Replace of t ]) ‑> t`
`module Expert : sig ... end`
`module Stable : sig ... end`