let create
?(host=Ketrew_host.tmp_on_localhost)
?queue ?name ?wall_limit ?processors ?project
program =
`Long_running ("LSF",
`Created {host; program; queue; name;
wall_limit; project; processors}
|> serialize)