function [xe,xo,m]=evenodd(x,nx)
%《數字信號處理教程——MATLAB釋義與實現》子程序
% 實現復數序列的奇偶分解 x(n) = xe(n)+xo(n)
% 電子工業出版社出版  陳懷琛編著 2004年9月
%
% [xe,xo,m]=evenodd(x,nx)
% -----------------------------
%   m = 奇偶序列的位置向量, 
%  xe = 在 m上的偶序列
%  xo = 在 m上的奇序列
%
[x1,nx1] = seqfold(conj(x),nx);
[xe,m]=seqadd(x/2,nx,x1/2,nx1)		% 按(2.3.5)求出序列xe
xo=seqadd(x/2,nx,-x1/2,nx1) 		% 按(2.3.5)求出序列xo