bpdemo.m

％ Atomizer Main Directory, Version .802 里面信号含有分解去噪合成过程的代码 ％---------------------------------------

% BPDemo -- Show BP Figs with Point & Click Interface
%----------------------------------------------------------------------
%   To run, just type BPDemo
%----------------------------------------------------------------------

%----------------------------------------------------------------------
% 11 Apr 1996: (S. Chen) First version of BPDemo.
% 12 Apr 2001: (M. Saunders) Updated to allow choice of solvers.
%              For some reason, an unwanted figure(1) appears.
%----------------------------------------------------------------------

header = 'Basis Pursuit Figures';
labels = [ ...
    'Engine 1998   '
    'Engine 2001   '
    'Run Figure 2.1'
    'Run Figure 2.2'
    'Run Figure 2.3'
    'Run Figure 2.4'
    'Run Figure 2.5'
    'Run Figure 2.6'
    'Run Figure 3.1'
    'Run Figure 3.2'
    'Run Figure 3.3'
    'Run Figure 3.4'
    'Run Figure 4.1'
    'Run Figure 5.1'
    'Run Figure 5.2'
    'Run Figure 5.3'
    'Run Figure 5.4'];

callbacks = [ ...
    'bpeng(1)'
    'bpeng(2)'
    'bpfig21 '
    'bpfig22 '
    'bpfig23 '
    'bpfig24 '
    'bpfig25 '
    'bpfig26 '
    'bpfig31 '
    'bpfig32 '
    'bpfig33 '
    'bpfig34 '
    'bpfig41 '
    'bpfig51 '
    'bpfig52 '
    'bpfig53 '
    'bpfig54 '];

  help BPIntro

% THE FOLLOWING SHOULDN'T BE NEEDED.
  disp(' ')
  disp('*************************************')
  disp('BPDemo creates an unwanted figure(1).')
  disp('Please delete it.')
  disp('*************************************')
  
% Construct menu window.
  choices('Basis Pursuit',header,labels,callbacks);

% Finished.
  clear labels callbacks header