`type t``= private Email_message.Email.t```
`include sig ... end`
`val sexp_of_t : t ‑> Base.Sexp.t`
`val of_email : Email_message.Email.t ‑> t`
`val create : content_type:Mimetype.t ‑> ?⁠encoding:Email_message.Octet_stream.Encoding.known ‑> ?⁠extra_headers:(Email_message__.Headers.Name.t * Email_message__.Headers.Value.t) list ‑> string ‑> t`
`val html : ?⁠encoding:Email_message.Octet_stream.Encoding.known ‑> ?⁠extra_headers:(Email_message__.Headers.Name.t * Email_message__.Headers.Value.t) list ‑> string ‑> t`
`val text : ?⁠encoding:Email_message.Octet_stream.Encoding.known ‑> ?⁠extra_headers:(Email_message__.Headers.Name.t * Email_message__.Headers.Value.t) list ‑> string ‑> t`
`val of_file : ?⁠content_type:Mimetype.t ‑> ?⁠encoding:Email_message.Octet_stream.Encoding.known ‑> ?⁠extra_headers:(Email_message__.Headers.Name.t * Email_message__.Headers.Value.t) list ‑> string ‑> t Async.Deferred.t`
`val alternatives : ?⁠extra_headers:(Email_message__.Headers.Name.t * Email_message__.Headers.Value.t) list ‑> t list ‑> t`
`val mixed : ?⁠extra_headers:(Email_message__.Headers.Name.t * Email_message__.Headers.Value.t) list ‑> t list ‑> t`
`val with_related : ?⁠extra_headers:(Email_message__.Headers.Name.t * Email_message__.Headers.Value.t) list ‑> resources:(attachment_name * t) list ‑> t ‑> t`
`val content_type : t ‑> Mimetype.t`
`val related_part_cid : t ‑> attachment_name option`
`val all_related_parts : t ‑> (attachment_name * t) list`
`val find_related : t ‑> attachment_name ‑> t option`
`val content : t ‑> Email_message.Octet_stream.t option`
`val parts : t ‑> t list option`
`val alternative_parts : t ‑> t list`
`val inline_parts : t ‑> t list`
`val to_file : t ‑> string ‑> unit Async.Deferred.Or_error.t`