clmodal.m

来自「Programs for the book Advanced Engineeri」· M 代码 · 共 8 行

function [M,Dlam]=clmodal(A)
% CALL: [M,Dlam]=clmodal(A) computes a modal matrix M and
%   the matrix Dlam=(M^-1)*A*M
[M Dlam]=eig(A);      % M is Modal matrix
%                       Dlam is diagonal   
%
% Notice that this function is implemented with only one
%   MATLAB command