sig type t = { samplerate : int; samplesize : int; channels : int; duration : float option; header : bool; } val to_string : Encoder.WAV.t -> string end