samer@34: function X=poly2snd(A,u)
samer@34: % POLY2SND  - Convert array of filter polynomial coeffs to one long sound by filtering noise
samer@34: % Filter state is preserved as the function processes a number of filters
samer@34: %
samer@34: % poly2snd :: 
samer@34: % 	(A:array 1..N of Poly, signal~'noise to filter')
samer@34: %	->signal~'N concatentated sounds'
samer@34: %
samer@34: % Each ROW of A contains coefficients for one filter
samer@34: 
samer@34: Z=[];
samer@34: for k=1:size(A,1)
samer@34: 	[x,Z]=filter(1,A(k,:),u,Z);
samer@34: 	if any(isnan(Z)), Z=[]; end;
samer@34: 	X(:,k)=0.999*x/max(abs(x));
samer@34: end
samer@34: 
samer@34: