view dsp/synth/spec2snd.m @ 61:eff6bddf82e3 tip

Finally implemented perceptual brightness thing.

function Y=spec2snd(X,frame,hop,varargin)
% spec2snd - Sound from sequence of power spectra
%
% spec2snd :: 
% 	  seq([[M,L]])	~'power spectra in columns',
%	  natural   	~'frame size for resynthesis',
% 	  natural	   ~'hop size for unbuffer'
% -> seq([[M]])	~'output sequence'.


src=rndseq(gaussian,frame+size(X,1)-1);
Y=unbuffer(fir2snd(spec2fir(X),src),hop);