sig
  type t
  val create : int -> int -> Audio.Buffer_ext.t
  val duration : Audio.Buffer_ext.t -> int
  val prepare : Audio.Buffer_ext.t -> ?channels:int -> int -> Audio.buffer
end