CLC is all closed; Clear all;

64 cases;

Signature = sigmerge(fmlin(N，0，0.4)，fmlin(N，0.3，0.5)， 1)；

% computing Wigner distribution

[TFR, t, F = tfrwv (signature)

Figure (1)

Contour lines (t, f, ABS(TFR). ^ 2)

Xlabel ('time t');

Ylabel ('frequency');

Figure (2)

Purpose (t, f, ABS (TFR) 2); .

Xlabel ('time t');

Ylabel ('frequency f');

Zlabel ('amplitude a');

%%% slice

Figure (3)

N = search (f = = 0.210937 50000000);

ffabs = abs(tfr)^ 2； .

FF = ffabs(N，)；

Products (tons, francs)