type t
val authenticate : log:Async_smtp__.Mail_log.t ‑> t ‑> username:string ‑> password:string ‑> t Async_smtp.Smtp_monad.t