sig
  class type t =
    object
      method channels : int
      method close : unit
      method duration : int
      method duration_time : float
      method read : Audio.buffer -> int -> int -> int
      method sample_rate : int
      method seek : int -> unit
    end
  class of_wav_file : string -> t
end