// =============================================================================
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) ????-2008 - INRIA
//
//  This file is distributed under the same license as the Scilab package.
// =============================================================================
  a = wavread('SCI/modules/sound/demos/chimes.wav','size');
	if size(a) <> [ 1 2] then bugmes();quit;end
  if a <> [ 2 13921] then bugmes();quit;end
  [y,Fs,bits]=wavread('SCI/modules/sound/demos/chimes.wav');
  if Fs <> 22050 then bugmes();quit;end
  if bits <> 16 then bugmes();quit;end
  if size(y) <> [ 2 13921] then bugmes();quit;end
  //subplot(2,1,1)
  //plot2d(y(:,1))
  //subplot(2,1,2)
  //plot2d(y(:,2))
  //xdel(winsid());
  y=wavread('SCI/modules/sound/demos/chimes.wav',[1 5]) //the first five samples
 y  =
 
    0.0000610    0.0002747    0.0002136    0.0001526    0.0000916  
    0.0000916    0.0001831    0.0000610    0.           0.0000916  
  if size(y) <> [2 5] then bugmes();quit;end