% Figure 8b of "Cancellation model of pitch perception" (JASA 97)

global sr;
sr = 10000;

D = 0.1;
start = 0.018;	% s
stop = 0.055;	% s
chunk = [start *sr : stop * sr] ;		% s, portion to plot


y = synth_ramp;
x = abscissa(D) * 1000;
plot(x(:,chunk) - start*1000, y(:,chunk));

set(get(gca, 'XLabel'), 'String', 'time (ms)');
set(get(gca, 'title'), 'String', '"Cancellation model of pitch perception" - Fig. 8b');