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

波变换

开发平台:

Matlab

  1. function varargout = get(t,varargin)
  2. %GET Get WVTREE object field contents.
  3. %   [FieldValue1,FieldValue2, ...] = ...
  4. %       GET(T,'FieldName1','FieldName2', ...) returns
  5. %   the contents of the specified fields for the WVTREE
  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. %     'dummy'   : Not Used
  14. %     'wtree'   : wtree parent object
  15. %
  16. %   Or fields in WTREE parent object:
  17. %     'dwtMode' : DWT extension mode
  18. %     'wavInfo' : Structure (wavelet infos)
  19. %        'wavName' - Wavelet Name
  20. %        'Lo_D'    - Low Decomposition filter
  21. %        'Hi_D'    - High Decomposition filter
  22. %        'Lo_R'    - Low Reconstruction filter
  23. %        'Hi_R'    - High Reconstruction filter
  24. %
  25. %   Type help dtree/get for more information on other
  26. %   valid choices for 'FieldName'.
  27. %
  28. %   See also DTREE/READ, DTREE/SET, DTREE/WRITE.
  29. %   M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 09-Oct-1998.
  30. %   Last Revision: 18-May-2003.
  31. %   Copyright 1995-2004 The MathWorks, Inc.
  32. %   $Revision: 1.5.4.2 $  $Date: 2004/03/15 22:36:13 $ 
  33. nbin = length(varargin);
  34. if nbin==0 , varargout = struct2cell(struct(t))'; return; end
  35. varargout = cell(nbin,1);
  36. okArg = ones(1,nbin);
  37. for k=1:nbin
  38.     field = varargin{k};
  39.     try
  40.       varargout{k} = t.(field);
  41.     catch
  42.       lasterr('');
  43.       varargout{k} = get(t.wtree,field);
  44.       if isequal(lasterr,'errorWTBX') , okArg(k) = 0; end
  45.     end    
  46. end
  47. notOk = find(okArg==0);
  48. if ~isempty(notOk)
  49.     [varargout{notOk}] = getwtbo(t,varargin{notOk});
  50. end