subplot(1,1,1)
%sig
%=============================  
infoStr= ...
    ['                                                            '
     ' This is an example of construction of one                  '
     ' of Donoho-Johnstones test functions (doppler).             '
     ' "MakeSignal(name, size)"                                   '
     '                                                            '];
infoStr
pause;

%help MakeSignal
sig = MakeSignal('Doppler',256);
x = [1/256 : 1/256 : 1 ];
figure(1)
plot(x, sig, '-', 'LineWidth', 1.0)
title 'Example 1'
%=============================  
 %plot(x, sig, '--')
 %plot(x, sig, '-.')
 %plot(x, sig, 'o')
 %plot(x, sig, 'd')
 %plot(x, sig, ':')
 % '.', 'o', 'x', '+', 'square', 'diamond', '^', 'v',
 % '<', '>', 'pentagram', 'hexagram'
%==============================
infoStr= ...
    ['                                                            '
     ' Continuous Wavelet Transforms                              '
     ' Sombrero wavelet                                           '
     ' 12 voices                                                  '
     '                                                            '];
infoStr
pause;

 obj1 = CWT( sig, 12, 'Sombrero');
 ImageCWT(obj1, 'Overall', 'hot')

infoStr= ...
    ['                                                            '
     ' Continuous Wavelet Transforms of "Blocks"                  '
     ' Sombrero wavelet                                           '
     ' 12 voices                                                  '
     '                                                            '];
infoStr
pause;

 sig2 = MakeSignal('Blocks', 256);
 obj2 = CWT( sig2, 12, 'Sombrero');
 subplot(2,1,1)
 ImageCWT(obj2, 'Overall', 'gray')
 subplot(2,1,2)
 plot([1:256],sig2, '-')
 axis([1 256 -3 6])