% ACF and SDF

global sr;				% sampling rate
sr = 10000;
range = 0.012; 			% s
windowsize = 0.05;		% s
f0 = 100;				% modulation frequency
	
y = synth_AM_noise(f0);

subplot(2,1,1);
yy = acf2(y, range*sr, windowsize*sr);
plot1(yy);
set(get(gca, 'title'), 'String',...
	'ACF');

subplot(2,1,2);
yy = sdf2(y, range*sr, windowsize*sr);
plot1(yy);
set(get(gca, 'title'), 'String',...
	'SDF');