include sig ... endval sexp_of_t : t ‑> Base.Sexp.tval create : ?from:[ `Keep | `Change_to of Email_address.t ] ‑> ?to_:[ `Keep | `Change_to of Email_address.t list ] ‑> ?cc:[ `Keep | `Change_to of Email_address.t list ] ‑> ?subject:[ `Keep | `Prepend of string ] ‑> Email_message__.Email_simple.Content.t ‑> tval create_from_email : Email_message.Email.t ‑> tval add : t ‑> Email_message.Email.t ‑> Email_message.Email.tmodule Stable : sig ... end