sig
  val msg : Logs.level -> 'Logs.log
  val app : 'Logs.log
  val err : 'Logs.log
  val warn : 'Logs.log
  val info : 'Logs.log
  val debug : 'Logs.log
  val kmsg : (unit -> 'b) -> Logs.level -> ('a, 'b) Logs.msgf -> 'b
  val on_error :
    ?level:Logs.level ->
    ?header:string ->
    ?tags:Logs.Tag.set ->
    pp:(Stdlib.Format.formatter -> '-> unit) ->
    use:('-> 'a) -> ('a, 'b) Stdlib.result -> 'a
  val on_error_msg :
    ?level:Logs.level ->
    ?header:string ->
    ?tags:Logs.Tag.set ->
    use:(unit -> 'a) -> ('a, [ `Msg of string ]) Stdlib.result -> 'a
end