type version = | Mpeg1| Mpeg2| Mpeg2_5
type mode = | Stereo| Joint_stereo| Dual_channel| Mono
type t = {version : version;layer : int;crc : bool;bitrate : int;sample_rate : int;padding : bool;mode : mode;mode_extension : int;channels : int;length : int;samples : int;
}val parse : string -> int -> t optionval first_frame : string -> (int * t) optionval at_start : string -> t optionval frames : string -> (int * t) listval version_name : version -> string