ctranspose.m

来自「多小波分析源码」· M 代码 · 共 29 行

function Pt = ctranspose(P)

% CTRANSPOSE -- complex conjugate transpose of matrix polynomial
%
%        Pt = P'
%        Pt = ctranspose(P)
%
% This routine is not meant to be called by the user. It is called by
% Matlab when the expression P' is encountered. It takes the complex
% conjugate transpose of all the component matrices, and replaces the
% variable z by (1/z).

% Copyright (c) 2004 by Fritz Keinert ([e-mail]),
% Dept. of Mathematics, Iowa State University, Ames, IA 50011.
% This software may be freely used and distributed for non-commercial
% purposes, provided this copyright statement is preserved, and
% appropriate credit for its use is given.
%
% Last update: Feb 20, 2004

Pt = P;
[n1,n2,n3] = size(Pt.coef);
% the next line just creates space for Pt of the correct size and data type
Pt.coef = reshape(Pt.coef,n2,n1,n3);
for i = 1:n3
    Pt.coef(:,:,i) = P.coef(:,:,n3-i+1)';
end
Pt.min = - (P.min + n3 - 1);