sig
exception Mad_error of string
exception Read_error of string
exception End_of_stream
exception Openfile_error of string
exception Closefile_error of string
val wav_output_channels : int
val wav_output_sample_size : int
val wav_output_big_endian : bool
val wav_output_signed : bool
type mad_file
val openfile : string -> Mad.mad_file
val openstream : (int -> string * int) -> Mad.mad_file
val close : Mad.mad_file -> unit
val get_current_position : Mad.mad_file -> int
val decode_frame : Mad.mad_file -> string
val samplefreq : string -> int
val duration : string -> float
end