Make.I
type data
type state
val kind : string
val init : unit -> state
val update : state -> data -> unit
val to_metrics : state -> name:string -> ?description:string -> ?unit_:string -> clock:Clock.t -> unit -> Metrics.t list