开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 图形图像 > 波变换 > 查看源码
dw1dvmod.m
资源名称：wavelet_toolbox.rar　[点击查看]
上传用户：haiyisale
上传日期：2013-01-09
资源大小：3246k
文件大小：21k
源码类别：

波变换

开发平台：

Matlab

dw1dvmod.m：源码内容
  1. function [out1,out2,out3,out4,out5,out6] = ...
  2.                   dw1dvmod(option,win_dw1dtool,in3,in4,in5,in6,in7,in8,in9)
  3. %DW1DVMOD Discrete wavelet 1-D view mode manager.
  5. %   M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 12-Mar-96.
  6. %   Last Revision: 16-Jul-1999.
  7. %   Copyright 1995-2002 The MathWorks, Inc.
  8. %   $Revision: 1.20 $
  10. % Subfunction(s): 
  11. %----------------
  12. % SSSTRING.
  14. %--------------------------------------
  15. % mode 1 : scroll mode        = 'scr'
  16. % mode 2 : decomposition mode = 'dec'
  17. % mode 3 : separate mode      = 'sep'
  18. % mode 4 : superimposed mode  = 'sup'
  19. % mode 5 : tree mode          = 'tre'
  20. % mode 6 : cfs mode           = 'cfs'
  21. %--------------------------------------
  23. % MemBloc1 of stored values.
  24. %---------------------------
  25. n_param_anal   = 'DWAn1d_Par_Anal';
  26. ind_sig_name   = 1;
  27. ind_sig_size   = 2;
  28. ind_wav_name   = 3;
  29. ind_lev_anal   = 4;
  30. ind_axe_ref    = 5;
  31. ind_act_option = 6;
  32. ind_ssig_type  = 7;
  33. ind_thr_val    = 8;
  34. nb1_stored     = 8;
  36. % Default values.
  37. %----------------
  38. max_lev_anal = 12;
  40. % Tag property of objects.
  41. %-------------------------
  42. tag_pop_viewm   = 'View_Mode';
  43. tag_pus_dispopt = 'Pus_Options';
  44. tag_valapp_scr  = 'ValApp_Scr';
  45. tag_txtapp_scr  = 'TxtApp_Scr';
  46. tag_valdet_scr  = 'ValDet_Scr';
  47. tag_txtdet_scr  = 'TxtDet_Scr';
  48. tag_declev      = 'Pop_DecLev';
  49. tag_txtdeclev   = 'Txt_DecLev';
  51. % Handles of tagged objects.
  52. %---------------------------
  53. uic_handles = findobj(win_dw1dtool,'type','uicontrol');
  54. txt_handles = findobj(uic_handles,'Style','text');
  55. pop_handles = findobj(uic_handles,'Style','popupmenu');
  56. pus_dispopt = findobj(uic_handles,'tag',tag_pus_dispopt);
  58. % Local MemBloc of stored values.
  59. %---------------------------
  60. ind_scrm_1 =  1;
  61. ind_scrm_2 =  2;
  62. ind_decm_1 =  3;
  63. ind_decm_2 =  4;
  64. ind_sepm_1 =  5;
  65. ind_sepm_2 =  6;
  66. ind_supm_1 =  7;
  67. ind_supm_2 =  8;
  68. ind_trem_1 =  9;
  69. ind_trem_2 = 10;
  70. ind_cfsm_1 = 11;
  71. ind_cfsm_2 = 12;
  72. nb_stored  = 12;
  74. switch option
  75.     case 'ini_vm'
  76.         %*****************************************************************%
  77.         %** OPTION = 'ini_vm' - Default & Current values for every mode **%
  78.         %*****************************************************************%
  79.         % mode 1 : scroll mode        = 'scr'
  80.         % mode 2 : decomposition mode = 'dec'
  81.         % mode 3 : separate mode      = 'sep'
  82.         % mode 4 : superimposed mode  = 'sup'
  83.         % mode 5 : tree mode          = 'tre'
  84.         % mode 6 : cfs  mode          = 'cfs'
  85.         %--------------------------------------
  86.         scrm = [1 1 1 1 0 1 0 0 1 1];
  87.         decm = [1 0 1];
  88.         sepm = [1 1 1 1 0 ones(1,max_lev_anal) 1 0 ones(1,max_lev_anal) 1];
  89.         supm = [1 1 1 1 0 ones(1,max_lev_anal) 0 0 ones(1,max_lev_anal) 1];
  90.         trem = [1 0 1];
  91.         cfsm = [1 1 1 1 0 1 0 0 1 1];
  92.         memB = cell(1,nb_stored);
  93.         memB(ind_scrm_1) = {scrm};
  94.         memB(ind_scrm_2) = {scrm};
  95.         memB(ind_decm_1) = {decm};
  96.         memB(ind_decm_2) = {decm};
  97.         memB(ind_sepm_1) = {sepm};
  98.         memB(ind_sepm_2) = {sepm};
  99.         memB(ind_supm_1) = {supm};
  100.         memB(ind_supm_2) = {supm};
  101.         memB(ind_trem_1) = {trem};
  102.         memB(ind_trem_2) = {trem};
  103.         memB(ind_cfsm_1) = {cfsm};
  104.         memB(ind_cfsm_2) = {cfsm};
  105.         set(pus_dispopt,'Userdata',memB);
  107.     case 'set_vm'
  108.         %**************************************************%
  109.         %** OPTION = 'set_vm' - set View Mode Parameters **%
  110.         %**************************************************%
  111.         % mode 1 : scroll mode        = 'scr'
  112.         % mode 2 : decomposition mode = 'dec'
  113.         % mode 3 : separate mode      = 'sep'
  114.         % mode 4 : superimposed mode  = 'sup'
  115.         % mode 5 : tree mode          = 'tre'
  116.         % mode 6 : cfs  mode          = 'cfs'
  117.         %--------------------------------------
  118.         % in3 = mode
  119.         %------------
  120.         switch in3
  121.             case {1,'1','scr'}
  122.                 new_vm = [in4 in5 in6 in7 in8 in9];
  123.                 index  = ind_scrm_2;
  125.             case {2,'2','dec'}
  126.                 new_vm = [in4 in5];
  127.                 index  = ind_decm_2;
  129.             case {3,'3','sep'}
  130.                 Level_Anal = wmemtool('rmb',win_dw1dtool,n_param_anal,ind_lev_anal);
  131.                 plus = ones(1,max_lev_anal-Level_Anal);
  132.                 new_vm = [in4 in5 in6 plus in7 in8 plus in9];
  133.                 index  = ind_sepm_2;
  135.             case {4,'4','sup'}
  136.                 Level_Anal = wmemtool('rmb',win_dw1dtool,n_param_anal,ind_lev_anal);
  137.                 plus = ones(1,max_lev_anal-Level_Anal);
  138.                 new_vm = [in4 in5 in6 plus in7 in8 plus in9];
  139.                 index  = ind_supm_2;
  141.             case {5,'5','tre'}
  142.                 new_vm = [in4 in5];
  143.                 index  = ind_trem_2;
  145.             case {6,'6','cfs'}
  146.                 new_vm = [in4 in5 in6 in7 in8 in9];
  147.                 index  = ind_cfsm_2;
  148.         end
  149.         memB = get(pus_dispopt,'Userdata');
  150.         old_vm  = memB{index};
  151.         if find(new_vm~=old_vm)
  152.             out1 = 1;
  153.             memB(index) = {new_vm};
  154.             set(pus_dispopt,'Userdata',memB);
  155.         else
  156.             out1 = 0;
  157.         end
  159.     case 'get_vm'
  160.         %**************************************************%
  161.         %** OPTION = 'get_vm' - get View Mode Parameters **%
  162.         %**************************************************%
  163.         % mode 1 : scroll mode          = 'scr'
  164.         % mode 2 : decomposition mode   = 'dec'
  165.         % mode 3 : separate mode        = 'sep'
  166.         % mode 4 : superimposed mode    = 'sup
  167.         % mode 5 : tree mode            = 'tre'
  168.         % mode 6 : cfs  mode            = 'cfs'
  169.         %--------------------------------------
  170.         % in3 = mode
  171.         % in4 optional
  172.         % if nargin=4 , initial options
  173.         %------------------------------
  174.         memB = get(pus_dispopt,'Userdata');
  175.         if nargin==3 , indplus = 1 ; else , indplus = rem(in4,2); end
  176.         switch in3
  177.             case {1,'1','scr'}
  178.                 viewm = memB{ind_scrm_1+indplus};
  179.                 out1  = viewm(1:3);
  180.                 out2  = viewm(4:5);
  181.                 out3  = viewm(6);
  182.                 out4  = viewm(7:8);
  183.                 out5  = viewm(9);
  184.                 out6  = viewm(10);
  186.             case {2,'2','dec'}
  187.                 viewm = memB{ind_decm_1+indplus};
  188.                 out1  = viewm(1:2);
  189.                 out2  = viewm(3);
  191.             case {3,'3','sep'}
  192.                 Level_Anal = wmemtool('rmb',win_dw1dtool,n_param_anal,ind_lev_anal);
  193.                 viewm = memB{ind_sepm_1+indplus};
  194.                 out1  = viewm(1:3);
  195.                 out2  = viewm(4:5);
  196.                 out3  = viewm(6:max_lev_anal+5);
  197.                 out3  = out3(1:Level_Anal);
  198.                 out4  = viewm(max_lev_anal+6:max_lev_anal+7);
  199.                 out5  = viewm(max_lev_anal+8:2*max_lev_anal+7);
  200.                 out5  = out5(1:Level_Anal);
  201.                 out6  = viewm(2*max_lev_anal+8);
  203.             case {4,'4','sup'}
  204.                 Level_Anal = wmemtool('rmb',win_dw1dtool,n_param_anal,ind_lev_anal);
  205.                 viewm = memB{ind_supm_1+indplus};
  206.                 out1  = viewm(1:3);
  207.                 out2  = viewm(4:5);
  208.                 out3  = viewm(6:max_lev_anal+5);
  209.                 out3  = out3(1:Level_Anal);
  210.                 out4  = viewm(max_lev_anal+6:max_lev_anal+7);
  211.                 out5  = viewm(max_lev_anal+8:2*max_lev_anal+7);
  212.                 out5  = out5(1:Level_Anal);
  213.                 out6  = viewm(2*max_lev_anal+8);
  215.             case {5,'5','tre'}
  216.                 viewm = memB{ind_trem_1+indplus};
  217.                 out1  = viewm(1:2);
  218.                 out2  = viewm(3);
  220.             case {6,'6','cfs'}
  221.                 viewm = memB{ind_cfsm_1+indplus};
  222.                 out1  = viewm(1:3);
  223.                 out2  = viewm(4:5);
  224.                 out3  = viewm(6);
  225.                 out4  = viewm(7:8);
  226.                 out5  = viewm(9);
  227.                 out6  = viewm(10);
  228.         end
  230.     case 'ch_vm'
  231.         %***********************************************%
  232.         %** OPTION = 'ch_vm' - Change Mode  View Mode **%
  233.         %***********************************************%
  234.         % in3 = 1 (optional) - clean
  235.         % in3 = 2 (optional) - clean + redraw (return comp & deno)
  236.         %----------------------------------------------------------
  237.         % Handles of tagged objects.
  238.         %---------------------------
  239.         [btnHeight,ySpacing] = mextglob('get','Def_Btn_Height','Y_Spacing');
  240.         pop_viewm   = findobj(pop_handles,'tag',tag_pop_viewm);
  241.         pop_app_scr = findobj(pop_handles,'Tag',tag_valapp_scr);
  242.         pop_det_scr = findobj(pop_handles,'Tag',tag_valdet_scr);
  243.         pop_lev_dec = findobj(pop_handles,'Tag',tag_declev);
  244.         txt_app_scr = findobj(txt_handles,'Tag',tag_txtapp_scr);
  245.         txt_det_scr = findobj(txt_handles,'Tag',tag_txtdet_scr);
  246.         txt_lev_dec = findobj(txt_handles,'Tag',tag_txtdeclev);
  247.         hdl_col     = utcolmap('handles',win_dw1dtool,'all','true');
  248.         hdl_col     = hdl_col(:)';
  249.         
  250.         if nargin==2 , in3 = 0; end
  251.         old_mode = get(pop_viewm,'Userdata');
  252.         new_mode = get(pop_viewm,'Value');
  254.         %-------------------------------------------------------------%
  255.         %-- pour deno et comp on ne change que le signal synthetise --%
  256.         %-- sinon oter cette partie                                 --%
  257.         %-------------------------------------------------------------%
  258.         if in3==2
  259.             % Begin waiting.
  260.             %---------------
  261.             wwaiting('msg',win_dw1dtool,'Wait ... computing');
  263.             switch new_mode
  264.               case {2,'2','dec',5,'5','tre'}
  265.                   val = dw1dvmod('get_vm',win_dw1dtool,new_mode);
  266.                   ss_type = wmemtool('rmb',win_dw1dtool,n_param_anal,ind_ssig_type);
  267.                   str_ss  = ssString(ss_type);
  268.                   set(pus_dispopt, ...
  269.                         'Value',val(2),                   ...
  270.                         'String',sprintf('Show %s Sig.', str_ss) ...
  271.                         );
  273.             end
  274.             switch new_mode
  275.                 case {1,'1','scr'} , fname = 'dw1dscrm';
  276.                 case {2,'2','dec'} , fname = 'dw1ddecm';
  277.                 case {3,'3','sep'} , fname = 'dw1dsepm';
  278.                 case {4,'4','sup'} , fname = 'dw1dsupm';
  279.                 case {5,'5','tre'} , fname = 'dw1dtrem';
  280.                 case {6,'6','cfs'} , fname = 'dw1dcfsm';
  281.             end
  282.             feval(fname,'del_ss',win_dw1dtool);
  283.             % clean_val = -0;    % reset axes history. 
  284.             clean_val = -1;      % preserve axes history.
  285.             feval(fname,'view',win_dw1dtool,clean_val)
  287.             % End waiting.
  288.             %---------------
  289.             wwaiting('off',win_dw1dtool);
  291.             return;
  292.         end
  293.         %-------------------------------------------------------------%
  295.         if (old_mode==new_mode)
  296.             if in3==0
  297.                 return ;
  298.             elseif in3==1 | in3==2
  299.                 new_mode  = 1;
  300.                 set(pop_viewm,'Value',new_mode,'Userdata',new_mode);
  301.                 clear_val = 0;
  302.             end
  303.         else
  304.             clear_val = new_mode;
  305.             set(pop_viewm,'Userdata',new_mode);
  306.         end
  308.         % Begin waiting.
  309.         %---------------
  310.         wwaiting('msg',win_dw1dtool,'Wait ... computing');
  312.         % Borders and double borders.
  313.         %----------------------------
  314.         win_units = get(win_dw1dtool,'units');
  315.         deltay    = btnHeight+4*ySpacing;;
  316.         if ~strcmp(win_units,'pixels')
  317.             [dx,deltay] = wfigutil('prop_size',win_dw1dtool,1,deltay);
  318.         end
  319.         pos_pop_viewm   = get(pop_viewm,'Position');
  321.         pos_opt = get(pus_dispopt,'Position');
  322.         switch old_mode
  323.             case {1,'1','scr'}
  324.                 set([txt_app_scr,txt_det_scr,pop_app_scr,pop_det_scr, ...
  325.                      pus_dispopt],'Visible','off');
  326.                 feval('dw1dscrm','clear',win_dw1dtool,clear_val);
  328.             case {2,'2','dec'}
  329.                 set([txt_lev_dec,pop_lev_dec,pus_dispopt],'Visible','off');
  330.                 set(pus_dispopt,'Style','pushbutton');
  331.                 feval('dw1ddecm','clear',win_dw1dtool);
  332.                 drawnow;
  334.             case {3,'3','sep'}
  335.                 if (new_mode==1) | (new_mode==2)
  336.                     set(pus_dispopt,'Visible','off');
  337.                 end
  338.                 feval('dw1dsepm','clear',win_dw1dtool);
  339.                 drawnow;
  341.             case {4,'4','sup'}
  342.                 if (new_mode==1) | (new_mode==2)
  343.                     set(pus_dispopt,'Visible','off');
  344.                 end
  345.                 feval('dw1dsupm','clear',win_dw1dtool,clear_val);
  347.             case {5,'5','tre'}
  348.                 set([pus_dispopt],'Visible','off');
  349.                 set(pus_dispopt,'Style','pushbutton');
  350.                 feval('dw1dtrem','clear',win_dw1dtool);
  351.                 drawnow;
  353.             case {6,'6','cfs'}
  354.                 set([txt_app_scr,txt_det_scr,pop_app_scr,pop_det_scr, ...
  355.                      pus_dispopt],'Visible','off');
  356.                 feval('dw1dcfsm','clear',win_dw1dtool,clear_val);
  357.         end
  358.         
  359.         if ((new_mode==2) & find(old_mode==[1 3 4 5 6])) | ...
  360.            ((new_mode==5) & find(old_mode==[1 2 3 4 6]))
  361.             val = dw1dvmod('get_vm',win_dw1dtool,new_mode);
  362.             ss_type = wmemtool('rmb',win_dw1dtool,n_param_anal,ind_ssig_type);
  363.             str_ss  = ssString(ss_type);
  364.             if new_mode==2 , fname = 'dw1ddecm'; else , fname = 'dw1dtrem'; end 
  365.             cba_disp = [fname '(''ssig'',' ...
  366.                             int2str(win_dw1dtool) ',' ...
  367.                             num2mstr(pus_dispopt) ');'];
  368.             set(pus_dispopt,...
  369.                            'Style','checkbox',...
  370.                            'Value',val(2),...
  371.                            'String',sprintf('Show %s Sig.', str_ss), ...
  372.                            'Callback',cba_disp);
  374.         elseif ((old_mode==2) & find(new_mode==[1 3 4 5 6])) | ...
  375.                ((old_mode==5) & find(new_mode==[1 2 3 4 6]))
  376.             cba_disp = ['dw1ddisp(''create'',' int2str(win_dw1dtool) ');'];
  377.             set(pus_dispopt,...
  378.                            'Style','pushbutton',            ...
  379.                            'String',xlate('More Display Options'), ...
  380.                            'Callback',cba_disp);
  381.         end
  383.         switch new_mode
  384.             case {1,'1','scr'}
  385.                 pos_txt1   = get(txt_app_scr,'Position');
  386.                 pos_opt(2) = pos_txt1(2)-deltay;
  387.                 set(pus_dispopt,'Position',pos_opt);
  388.                 set([txt_app_scr, txt_det_scr, ...
  389.                      pop_app_scr, pop_det_scr, ...
  390.                      pus_dispopt, hdl_col],    ...
  391.                      'Visible','on');
  392.                 drawnow
  393.                 if (clear_val==0) & (in3==1) , return; end
  394.                 feval('dw1dscrm','view',win_dw1dtool,old_mode);
  396.             case {2,'2','dec'}
  397.                 pos_txt1   = get(txt_lev_dec,'Position');
  398.                 pos_opt(2) = pos_txt1(2)-deltay;
  399.                 set(pus_dispopt,'Position',pos_opt);
  400.                 set([txt_lev_dec, pop_lev_dec,pus_dispopt],'Visible','on');
  401.                 set([hdl_col],'Visible','off');         
  402.                 drawnow
  403.                 lev = get(pop_lev_dec,'Value'); 
  404.                 feval('dw1ddecm','view',win_dw1dtool,old_mode,lev);
  406.             case {3,'3','sep'}
  407.                 pos_opt(2) = pos_pop_viewm(2)-deltay;
  408.                 set(pus_dispopt,'Position',pos_opt);
  409.                 set([pus_dispopt,hdl_col],'Visible','on');
  410.                 drawnow
  411.                 feval('dw1dsepm','view',win_dw1dtool,old_mode);
  413.             case {4,'4','sup'}
  414.                 pos_opt(2) = pos_pop_viewm(2)-deltay;
  415.                 set(pus_dispopt,'Position',pos_opt);
  416.                 set([pus_dispopt,hdl_col],'Visible','on');
  417.                 drawnow
  418.                 feval('dw1dsupm','view',win_dw1dtool,old_mode);
  420.             case {5,'5','tre'}
  421.                 pos_txt1   = get(txt_lev_dec,'Position');
  422.                 pos_opt(2) = pos_txt1(2)-deltay;
  423.                 set(pus_dispopt,'Position',pos_opt);
  424.                 set([pus_dispopt],'Visible','on');
  425.                 set([hdl_col],'Visible','off');         
  426.                 drawnow
  427.                 lev = get(pop_lev_dec,'Value');
  428.                 feval('dw1dtrem','view',win_dw1dtool,old_mode,lev);
  430.             case {6,'6','cfs'}
  431.                 pos_txt1   = get(txt_app_scr,'Position');
  432.                 pos_opt(2) = pos_txt1(2)-deltay;
  433.                 set(pus_dispopt,'Position',pos_opt);
  434.                 set([txt_app_scr, txt_det_scr, ...
  435.                      pop_app_scr, pop_det_scr, ...
  436.                      pus_dispopt],    ...
  437.                      'Visible','on');
  438.                 set([hdl_col],'Visible','off');         
  439.                 drawnow
  440.                 if (clear_val==0) & (in3==1) , return; end
  441.                 feval('dw1dcfsm','view',win_dw1dtool,old_mode);
  442.         end
  444.         % End waiting.
  445.         %---------------
  446.         wwaiting('off',win_dw1dtool);
  448.     case 'ss_vm'
  449.         %*******************************************************%
  450.         %** OPTION = 'ss_vm' - set Visibility of synth signal **%
  451.         %*******************************************************%
  452.         % mode 1 : scroll mode        = 'scr'
  453.         % mode 2 : decomposition mode = 'dec'
  454.         % mode 3 : separate mode      = 'sep'
  455.         % mode 4 : superimposed mode  = 'sup'
  456.         % mode 5 : tree mode          = 'tre'
  457.         % mode 6 : cfs  mode          = 'cfs'
  458.         %-----------------------------------------
  459.         % in3 = view_mode (s)
  460.         % in4 = 0 (invisible) or in4 = 1 (visible)
  461.         % in5 = 0 (invisible) or in5 = 1 (visible)
  462.         %------------------------------------------
  464.         if nargin==4 , in5 = in4; end
  465.         memB = get(pus_dispopt,'Userdata');
  466.         if find(in3==1)
  467.             viewm            = memB{ind_scrm_2};
  468.             viewm(5)         = in4;
  469.             viewm(8)         = in5;
  470.             memB(ind_scrm_2) = {viewm};
  471.         end
  473.         if find(in3==2)
  474.             viewm            = memB{ind_decm_2};
  475.             viewm(2)         = in4;
  476.             memB(ind_decm_2) = {viewm};
  477.         end
  479.         if find(in3==3)
  480.             viewm                 = memB{ind_sepm_2};
  481.             viewm(5)              = in4;
  482.             viewm(max_lev_anal+7) = in5;
  483.             memB(ind_sepm_2)      = {viewm};
  484.         end
  486.         if find(in3==4)
  487.             viewm                 = memB{ind_supm_2};
  488.             viewm(5)              = in4;
  489.             viewm(max_lev_anal+7) = in5;
  490.             memB(ind_supm_2)      = {viewm};
  491.         end
  493.         if find(in3==5)
  494.             viewm            = memB{ind_trem_2};
  495.             viewm(2)         = in4;
  496.             memB(ind_trem_2) = {viewm};
  497.         end
  499.         if find(in3==6)
  500.             viewm            = memB{ind_cfsm_2};
  501.             viewm(5)         = in4;
  502.             viewm(8)         = in5;
  503.             memB(ind_cfsm_2) = {viewm};
  504.         end
  506.         set(pus_dispopt,'Userdata',memB);
  508.     case 'ccfs_vm'
  509.         %*************************************************%
  510.         %** OPTION = 'ccfs_vm' - get coloration options **%
  511.         %*************************************************%
  512.         % mode 1 : scroll mode        = 'scr'
  513.         % mode 2 : decomposition mode = 'dec'
  514.         % mode 3 : separate mode      = 'sep'
  515.         % mode 4 : superimposed mode  = 'sup'
  516.         % mode 5 : tree mode          = 'tre'
  517.         % mode 6 : cfs  mode          = 'cfs'
  518.         %--------------------------------------
  519.         % in3 = mode
  520.         %------------------------------
  521.         memB = get(pus_dispopt,'Userdata');
  522.         switch in3
  523.             case {1,'1','scr'}
  524.                 viewm = memB{ind_scrm_2};
  525.                 out1  = viewm(10);
  527.             case {2,'2','dec'}
  528.                 viewm = memB{ind_decm_2};
  529.                 out1  = viewm(3);
  531.             case {3,'3','sep'}
  532.                 viewm = memB{ind_sepm_2};
  533.                 out1  = viewm(2*max_lev_anal+8);
  535.             case {4,'4','sup'}
  536.                 viewm = memB{ind_supm_2};
  537.                 out1  = viewm(2*max_lev_anal+8);
  539.             case {5,'5','tre'}
  540.                 viewm = memB{ind_trem_2};
  541.                 out1  = viewm(3);
  543.             case {6,'6','cfs'}
  544.                 viewm = memB{ind_cfsm_2};
  545.                 out1  = viewm(10);
  546.         end
  548.     otherwise
  549.         errargt(mfilename,'Unknown Option','msg');
  550.         error('*');
  551. end
  554. %--------------------------------------
  555. function s = ssString(ss_type)
  557. switch ss_type
  558.     case 'ss', s = 'Synthesized';
  559.     case 'ds', s = 'De-noised';
  560.     case 'cs', s = 'Compressed';
  561. end
  562. %--------------------------------------