%------------Example 2 -------------------------------------
                clf;     
                set(0, 'DefaultAxesFontSize', 12);
                set(0, 'DefaultAxesFontName', 'Times')
%Interference 
        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 = 512;
        f = MakeSignal('Gabor',N);

        axes('position',h1);
        plot(real(f))
        axis([200 460 min(real(f)) max(real(f))])
        axes('position',h2)
        WignerDist(f);
        axis([200 460 0 128]);
        print(gcf,'-deps','interference.eps')

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