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

波变换

开发平台:

Matlab

  1. function x = rnodcoef(t,node)
  2. %RNODCOEF Reconstruct node coefficients.
  3. %   X = RNODCOEF(T,N) computes reconstructed coefficients
  4. %   of the node N of the tree T.
  5. %
  6. %   X = RNODCOEF(T) is equivalent to X = RNODCOEF(T,0).
  7. %   M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 18-Oct-96.
  8. %   Last Revision: 21-May-2003.
  9. %   Copyright 1995-2004 The MathWorks, Inc.
  10. %   $Revision: 1.4.4.2 $  $Date: 2004/03/15 22:37:35 $
  11. % Check arguments.
  12. if nargin==1, node = 0; end
  13. if find(isnode(t,node)==0)
  14.     error('Invalid node value.');
  15. end
  16. % Get node data (coefficients).
  17. [nul,x] = nodejoin(t,node);
  18. % Get asc, edges, ...
  19. order = treeord(t);
  20. asc   = nodeasc(t,node);
  21. node  = asc(1);
  22. if length(asc)<2 , return; end
  23. sizes = read(t,'sizes',asc(2:end));
  24. [d,p] = ind2depo(order,asc);
  25. edges = rem(p,order);
  26. edges = edges(1:end-1);
  27. % Reconstruction.
  28. x = recons(t,node,x,sizes,edges);