load car3.txt
z=complexify(car3);
z=z(12000:12000+3999); % 4000 samples = 1/2 sec, after 1.5sec start
zcal=calibrateradar(z);

%%t=linspace(0,(length(z)-1)/8000,length(z));
subplot(221)
plot(real(z))
title('REAL')
ylabel('SAMPLE VALUE')
xlabel('SAMPLE INDEX')

subplot(222)
plot(imag(z))
title('IMAG.')
xlabel('SAMPLE INDEX')

drawnow

subplot(223)
tfhandtv(zcal)
xlabel('TIME'); ylabel('FREQ.')
title('SPECTROGRAM')
drawnow

subplot(224)
testchirpletcar3
title('CHIRPLET TRANSFORM')

