Module Monitor_sig.Monitor.Time

module Time: sig .. end

type t 
val elapsed_time : unit -> float
val create : string -> t
val kill : t -> unit
val start : t -> unit
val stop : t -> unit
val time : string -> ('a -> 'b) -> 'a -> 'b