Matlab有限元结构动力学分析与工程应用源程序

有限元结构动力学分析与工程应用这本书附带的（Matlab源程序）

E=2.1e11;      	%elastic molulus
poisson =0.3;         % poisson ratio
density=7.3e3;        %density
t=0.05;               %plate thickness
lx=2;                 %length in x direction
ly=2;                 %length in y direction
jdx=11;               %number of nodes in x direction
jdy=11;               %number of nodes in y direction

k（1:3301:330）=0;     %system stiffness matrix
m（1:3301:330）=0;    %system mass matrix

%prepare the arrays which are needed to describe this problem
en（1:1001:4）=0;       %element node  
for ni=1:jdx-1
    for nj=1:jdy-1
        en（ni+（nj-1）*（jdx-1）1）=ni+（nj-1）*jdx;
        en（ni+（nj-1）*（jdx-1）2）=ni+1+（nj-1）*jdx;
        en（ni+（nj-1）*（jdx-1）4）=ni+nj*jdx;
        en（ni+（nj-1）*（jdx-1）3）=ni+1+nj*jdx;
    end
end
disp（1:jdx*jdy1:3

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       1713  2010-01-26 19:49  m文件\第二章\Inviter.m

     文件       1809  2010-01-26 19:49  m文件\第二章\Ssiter.m

     文件       3945  2010-01-26 19:50  m文件\第二章\TransResp1.m

     文件       5196  2010-01-26 19:51  m文件\第二章\TransResp3.m

     文件       3734  2010-01-26 19:52  m文件\第二章\TransResp4.m

     文件       3529  2010-01-26 19:52  m文件\第二章\TransResp5.m

     文件       4766  2010-01-26 19:54  m文件\第二章\Modalresponse.m

     文件       5644  2010-01-26 19:55  m文件\第二章\freqresponse.m

     文件       2958  2010-01-26 19:47  m文件\第二章\EX241.m

     文件       2945  2010-01-26 19:48  m文件\第二章\EX242.m

     文件        335  2010-01-26 19:49  m文件\第二章\EX243.m

     文件       1799  2010-01-26 19:57  m文件\第三章\EX332.m

     文件        567  2010-01-26 19:58  m文件\第三章\EX333.m

     文件       1738  2010-01-26 20:01  m文件\第四章\GaussPoint2.m

     文件       1549  2010-01-26 20:01  m文件\第四章\Materialiso.m

     文件       1566  2010-01-26 20:01  m文件\第四章\FemIsoq4.m

     文件       1124  2010-01-26 20:02  m文件\第四章\FemJacobi2.m

     文件       1138  2010-01-26 20:02  m文件\第四章\FemDeriv2.m

     文件        928  2010-01-26 20:03  m文件\第四章\FemKine2D.m

     文件        901  2010-01-26 20:03  m文件\第四章\FemEldof.m

     文件        793  2010-01-26 20:04  m文件\第四章\FemAsmbl1.m

     文件        912  2010-01-26 20:04  m文件\第四章\FemAplyc2.m

     文件       7066  2010-01-26 19:59  m文件\第四章\EX471.m

     文件       7930  2010-01-26 20:00  m文件\第四章\EX472.m

     文件       1013  2010-01-26 20:15  m文件\第五章\femEldof.m

     文件        839  2010-01-26 20:16  m文件\第五章\femAssemble1.m

     文件       1262  2010-01-26 20:16  m文件\第五章\femApplybc1.m

     文件       3388  2010-01-26 20:16  m文件\第五章\kkCheck1.m

     文件       3248  2010-01-26 20:17  m文件\第五章\mmCheck1.m

     文件       2745  2010-01-26 20:17  m文件\第五章\bcCheck1.m

............此处省略79个文件信息