sig   type t   val create : unit -> CCTimer.t   val set_exn_handler : CCTimer.t -> (exn -> unit) -> unit   exception Stopped   val after : CCTimer.t -> float -> f:(unit -> 'a) -> unit   val at : CCTimer.t -> float -> f:(unit -> 'a) -> unit   exception ExitEvery   val every : ?delay:float -> CCTimer.t -> float -> f:(unit -> 'a) -> unit   val stop : CCTimer.t -> unit   val active : CCTimer.t -> bool end