sig   val enter : unit -> unit   val pp_obj : Format.formatter -> < .. > Js.t -> unit   val dump_obj : < .. > Js.t -> unit   val tick : Format.formatter -> '-> unit   val pr : ('a, Format.formatter, unit) Pervasives.format -> 'a   val trace : ?pp:(Format.formatter -> '-> unit) -> string -> '-> 'a   val etrace :     ?obs:bool ->     ?pp:(Format.formatter -> '-> unit) ->     string -> 'Note.event -> 'Note.event   val strace :     ?obs:bool ->     ?pp:(Format.formatter -> '-> unit) ->     string -> 'Note.signal -> 'Note.signal end