% demo_realloc.m
%
% P. Flandrin
 
Nx  = 128 ;                      % signal
Nh1 =  21 ; Nh2 = 63; Nh3 = 127; % windows
Nb  = 128 ;   c =  1;            % TFD and display
varwindow(Nx,Nh1,Nh2,Nh3,Nb,c);

pause
 
Nx =  16 ; fmin = 0 ; fmax = 0.5 ; Ny = 256; % signal
Nh = 255 ;   dt = 1 ;   Nb = 128 ;  c =   1; % TFD and display

x  = gchirp(Nx,fmin,fmax); Lx = length(x);
y  = zeros(Ny,1); y(Ny/2-Lx/2:Ny/2+Lx/2-1) = x;

sprspplot(y,dt,Nb,Nh,c);

pause

Nx = 128;        % signal
Nh =  31;        % window
Nb = 128; c = 1; % TFD and display
resol(Nx,Nh,Nb,c);

pause
 
Nx = 256; Nhp = 21; % signal
Nh =  19;           % window
Nb = 128;    c = 1; % TFD and display
quasilin(Nx,Nh,Nb,Nhp,c);

