%------------Example 3 -------------------------------------
                clf;     
                set(0, 'DefaultAxesFontSize', 12);
                set(0, 'DefaultAxesFontName', 'Times')
%VW Example
        f = MakeChirps('Chirps',1024);
        delta = 1/15;
        unit = (1-3*delta)/3;
        h2 = [delta delta 1-2*delta 2*unit];
        h1 = [delta 2*(unit+delta) 1-2*delta unit];

        N = 1024;
        axes('position',h1);
        plot(real(f));
        axis([1 N min(real(f)) max(real(f))]);
        g = Analytic(f);
        axes('position',h2);
        wv = WignerDist(g);
          print(gcf,'-deps','chirps.eps')

% Written by Maureen Clerc and Jerome Kalifa, 1997
% clerc@cmapx.polytechnique.fr, kalifa@cmapx.polytechnique.fr

~