user:string -> get_password:(unit -> string) -> get_account:(unit -> string) -> unit -> Ftp_client.ftp_method
