有限元第8讲.pdfVIP

结构有限元分析 结构有限元分析 北京交通大学土木建筑工程学院 北京交通大学土木建筑工程学院 2008 年5 月 2008 5 年 月 第8讲（2学时） 第8讲（2学时） 第一章 杆系结构有限元 第一章 杆系结构有限元 分析的基本原理 分析的基本原理 PROGRAM 1 PROGRAM 1 杆系结构有限元法的小结 杆系结构有限元法的小结 杆系结构有限元法的分析的具体步骤： 杆系结构有限元法的分析的具体步骤： (1)结构离散化 (1)结构离散化 (2)结构描述（数据准备阶段） (2)结构描述（数据准备阶段） (3)单元特性计算（单元分析） (3)单元特性计算（单元分析） (4)组集结构总刚矩阵（系统分析第一步） (4)组集结构总刚矩阵（系统分析第一步） Program 1 Program 1 MODULE ALLDATA MODULE ALLDATA 数据块名 数据块名 PARAMETER (MAXNODE=500) PARAMETER (MAXNODE=500) 最大结点号 最大结点号 PARAMETER (MAXELEM=500) 最大单元号 PARAMETER (MAXELEM=500) 最大单元号 PARAMETER (MAXFORC=500) PARAMETER (MAXFORC=500) 最大外力号 最大外力号 PARAMETER (MAXMATO=3000) 最大矩阵阶数 PARAMETER (MAXMATO=3000) 最大矩阵阶数 INTEGER:: NJ,NM,NE,NF INTEGER:: NJ,NM,NE,NF结点数,截面数,单元数,外力数 结点数,截面数,单元数,外力数 INTEGER:: NR(MAXNODE,6) INTEGER:: NR(MAXNODE,6) 约束信息 约束信息 REAL*8 :: X(MAXNODE),Y(MAXNODE),Z(MAXNODE) REAL*8 :: X(MAXNODE),Y(MAXNODE),Z(MAXNODE) REAL*8 :: XE(MAXELEM,7) REAL*8 :: XE(MAXELEM,7) 截面信息 截面信息 INTEGER:: JE(MAXELEM,5) INTEGER:: JE(MAXELEM,5) 单元信息 单元信息 INTEGER:: NJF(MAXFORC),NDF(MAXFORC) INTEGER:: NJF(MAXFORC),NDF(MAXFORC)荷载信息 荷载信息 REAL*8 :: VF(MAXFORC) REAL*8 :: VF(MAXFORC) 荷载信息