ex7.7.inp

ansys有限元分析程序

! 7.7  自由-自由梁的纵向自由振动
! 本程序来源于邢静忠编著的《ANSYS应用实例与分析》，科学出版社，2006年
!
FINISH
/CLEAR, NOSTART	! 清除数据, 不加载初始化文件
! （1）定义工程选项、单元类型、材料参数和实常数
/FILNAME, EX7.7	! 定义文件名称
/PREP7	! 加载前处理模块
/TITLE, EX7.7, LONGITUDINAL VIBRATION OF A FREE-FREE ROD
ANTYPE, MODAL	! 指定分析类型为模态分析
ET, 1, BEAM3	! 定义第1类单元为二维弹性梁单元BEAM3
R, 1, 1, 1, 1	! 定义梁的截面积为AREA=1, 抗弯惯性矩为IZZ=1和截面高度为HEIGHT=1
MODOPT, LANB, 3	! 选择分块LANCZOS特征值求解器, 求解前3阶模态
MP, EX, 1, 207E9	! 定义第1类材料的弹性模量EX ＝ 207 GPa
MP, DENS, 1, 7802	! 定义第1类材料的密度DENS ＝ 7802 kg/m^3
MP, PRXY, , 0.3	! 定义第1类材料的泊松比PRXY ＝ 0.3
! （2）通过关键点的定义建立模型
K, 1	! 在坐标原点（0, 0, 0）定义第1个关键点
K, 2, 20.32	! 在坐标(20.32m, 0)定义第2个关键点
L, 1, 2	! 过关键点1, 2定义直线
ESIZE, , 11	! 指定单元剖分格数为11
LMESH, 1	! 对直线1进行单元剖分
OUTPR, BASIC, 1	! 输出第1阶频率的基本内容
D, ALL, UY, , , , , ROTZ	! 约束所有节点在Y方向的自由度UY和绕Z轴转动自由度ROTZ
FINISH	! 退出前处理模块PREP7
! （3）在求解模块, 开始模态分析的求解
/SOLU	! 加载求解模块
SOLVE	! 开始求解
FINISH	! 退出求解模块SOLUTION
! （4）在一般后处理模块中, 获取频率计算结果
/POST1	! 加载后处理
*GET, FREQ1, MODE, 1, FREQ	! 获取第1阶频率计算结果, 存入变量FREQ1
*GET, FREQ2, MODE, 2, FREQ	! 获取第2阶频率计算结果, 存入变量FREQ2
*GET, FREQ3, MODE, 3, FREQ	! 获取第3阶频率计算结果, 存入变量FREQ3
*STATUS, PARM  	! 显示内存变量的值
FINISH	! 退出后处理模块