shortifft.m

来自「卷积盲源分离」· M 代码 · 共 5 行

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
function Wt = shortifft(Wf)
Wt = real(ifft(cat(3,Wf,conj(Wf(:,:,[end-1:-1:2]))),[],3));