
 unit WAV;


  interface

   procedure Get_WAV_Info(
    var File_Name : string;
    var Frequency,Resolution, Mode : word;
    var NData,File_Size,NSamples,Start_Address : longint;
    var Err_Code : integer);

   procedure Write_WAV_Header(var Fichier : file;
    Data_Size : longint ; Sample_Freq,Resolution, Mode : word;
    var Error : integer);


  end.