dzhli.m

matlab编写结构计算振型分解法

function [FF]=dzhli(aa,qq,AA,mm,dn)  
%求解水平地震作用F---输入变量：地震影响系数aa，
%                              地震影响系数曲线衰减指数rr,
%                              振型矩阵AA，
%                              质量mm
%                              结构层数dn
%                    返回变量：水平地震作用FF 

g=9.8;%重力加速度

for j=1:dn
    for i=1:dn
    FF(i,j)=AA(i,j)*aa(j)*qq(j)*mm(i)*g;
    end
end