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

波变换

开发平台:

Matlab

  1. function T = wavetype(wname,TYPE)
  2. %WAVETYPE Wavelet type information.
  3. %   T = WAVETYPE(W) returns the type T of the wavelet is W.
  4. %   The valid values for T are:
  5. %       - 'lazy' : for the "lazy" wavelet.
  6. %       - 'orth' : for orthogonal wavelets.
  7. %       - 'bior' : for biorthogonal wavelets.
  8. %       - 'unknow' : for unknown names.
  9. %
  10. %   R = WAVETYPE(W,T) returns 1 if the wavelet W is of 
  11. %   type T and 0 otherwise.
  12. %   M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 20-Jun-2003.
  13. %   Last Revision 08-Jul-2003.
  14. %   Copyright 1995-2004 The MathWorks, Inc.
  15. %   $Revision: 1.1.6.3 $ $Date: 2004/04/13 00:40:09 $ 
  16. waveCell = wavenames('lazy');
  17. if any(strcmpi(wname,waveCell))
  18.     T = 'lazy';
  19. else
  20.     waveCell = wavenames('orth');
  21.     if any(strcmpi(wname,waveCell))
  22.         T = 'orth';
  23.     else
  24.         waveCell = wavenames('bior');
  25.         if any(strcmpi(wname,waveCell))
  26.             T = 'bior';
  27.         else
  28.             T = 'unknown';
  29.         end
  30.     end
  31. end
  32. if nargin>1
  33.     T  = (lower(TYPE(1)) == T(1));
  34. end