let yarn_application ?host ?daemonize_using ?daemon_start_timeout program =
  Ketrew_yarn.create
    ?host ?daemonize_using ?daemon_start_timeout (`Yarn_application program)