samer@34: function y=expchirp(fs,f0,f1,t)
samer@34: % expchirp - exponential chirp
samer@34: %
samer@34: % expchirp ::
samer@34: %    F:real   ~'sampling frequency',
samer@34: %    real     ~'initial frequency',
samer@34: %    real     ~'final frequency',
samer@34: %    D:nonneg ~'duration'
samer@34: % -> [[1,D*F]].
samer@34: 
samer@34: y=chirp(0:(1/fs):t,f0,t,f1,'logarithmic',-90);