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

波变换

开发平台:

Matlab

  1. function O = odd(P)
  2. %ODD Odd part of a Laurent polynomial.
  3. %   O = ODD(P) returns the odd part O of the Laurent polynomial P.
  4. %   The polynomial O is such that:  
  5. %           O(z^2) = [P(z) - P(-z)] / [2*z^(-1)]
  6. %   
  7. %   See also EVEN.
  8. %   M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 21-Mar-2001.
  9. %   Last Revision: 15-Jun-2003.
  10. %   Copyright 1995-2004 The MathWorks, Inc.
  11. %   $Revision: 1.1.6.2 $  $Date: 2004/04/13 00:39:01 $
  12. % ODD(P) == EVEN(Z*P)
  13. %--------------------
  14. C = P.coefs;
  15. D = P.maxDEG;
  16. O = laurpoly(C(1+mod(D+1,2):2:end),floor((D+1)/2));