get.m
上传用户:haiyisale
上传日期:2013-01-09
资源大小:3246k
文件大小:2k
源码类别:

波变换

开发平台:

Matlab

  1. function varargout = get(t,varargin)
  2. %GET Get WDECTREE object field contents.
  3. %   [FieldValue1,FieldValue2, ...] = ...
  4. %       GET(T,'FieldName1','FieldName2', ...) returns
  5. %   the contents of the specified fields for the WDECTREE
  6. %   object T.
  7. %   For the fields, which are objects or structures, you
  8. %   may get subfield contents (see DTREE/GET).
  9. %
  10. %   [...] = GET(T) returns all the field contents of T.
  11. %
  12. %   The valid choices for 'FieldName' are:
  13. %     'dwtMode' : DWT extension mode
  14. %     'wavInfo' : Structure (wavelet infos)
  15. %        'wavName' - Wavelet Name
  16. %        'Lo_D'    - Low Decomposition filter
  17. %        'Hi_D'    - High Decomposition filter
  18. %        'Lo_R'    - Low Reconstruction filter
  19. %        'Hi_R'    - High Reconstruction filter
  20. %     'dtree'   : wtree parent object
  21. %
  22. %   Or fields in DTREE parent object:
  23. %     'dwtMode' : DWT extension mode
  24. %     'wavInfo' : Structure (wavelet infos)
  25. %        'wavName' - Wavelet Name
  26. %        'Lo_D'    - Low Decomposition filter
  27. %        'Hi_D'    - High Decomposition filter
  28. %        'Lo_R'    - Low Reconstruction filter
  29. %        'Hi_R'    - High Reconstruction filter
  30. %
  31. %   Type help dtree/get for more information on other
  32. %   valid choices for 'FieldName'.
  33. %
  34. %   See also DTREE/READ, DTREE/SET, DTREE/WRITE.
  35. %   M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi  12-Feb-2003.
  36. %   Last Revision: 11-Jul-2003.
  37. %   Copyright 1995-2004 The MathWorks, Inc.
  38. %   $Revision: 1.1.6.2 $ $Date: 2004/03/15 22:38:50 $ 
  39. nbin = length(varargin);
  40. if nbin==0 , varargout = struct2cell(struct(t))'; return; end
  41. varargout = cell(nbin,1);
  42. okArg = ones(1,nbin);
  43. for k=1:nbin
  44.     field = varargin{k};
  45.     try
  46.       varargout{k} = t.(field);
  47.     catch
  48.       lasterr('');
  49.       varargout{k} = get(t.dtree,field);
  50.       if isequal(lasterr,'errorWTBX') , okArg(k) = 0; end
  51.     end    
  52. end
  53. notOk = find(okArg==0);
  54. if ~isempty(notOk)
  55.     [varargout{notOk}] = getwtbo(t,varargin{notOk});
  56. end