load /mas/disks/vision9/steve/flakes/perspectivepics/red.txt
x=.10:.01:15.3;  % about 16.3 periods present
g=cos(2*pi*x);
subplot(211)
plot(red)
axis([0 320 0 200])
subplot(212)
plot(dechirp(g,320,.5-.23))
axis([0 320 -1 1])

