1 2 3 4 5 6 7
type t val create : unit -> t * unit Note.E.t val start: t -> float -> unit val stop: t -> unit