include (val Ohlog.logs "Gm")

let () =
  Ohlog.init () ~min_level:TRACE;
  info (fun m -> m "init")