let options = [
  ("--log-level"Arg.String(set_log),
   "<s> Set the initial logging output level to <s>.")
]