ex7.3.inp

ansys有限元分析程序

! 7.3  用弹簧单元连接的圆盘的扭转振动
! 本程序来源于邢静忠编著的《ANSYS应用实例与分析》，科学出版社，2006年
!
FINISH
/CLEAR, NOSTART	! 清除数据, 不加载初始化文件
! （1）设置工程选项、求解选项、单元类型和实常数
/FILNAME, EX7.3	! 定义工程文件名称
/PREP7	! 加载前处理模块
/TITLE, EX7.3, TORSIONAL FREQUENCY OF A SUSPENDED DISK.
ANTYPE, MODAL	! 定义分析类型为模态（MODAL）分析
MODOPT, REDUC, , , , 1	! 用降阶方法求解, 显示第1阶振型
MXPAND, 1 	! 展开第1阶频率
ET, 1, COMBIN14, , , 1	! 定义第1类单元为考虑扭转的弹簧COMBIN14
ET, 2, MASS21, , , 3	! 定义第2类单元为带转动惯量的二维质量单元MASS21
R, 1, 0.542337	! 定义弹簧扭转刚度系数k=0.542337 N.m/rad
R, 2, 1, 0.034235	! 定义集中质量为m=1, 转动惯量J=0.034235 kg.m^2
! （2）定义模型节点和单元连接关系
/VIEW, 1, 1, 1, 1	! 将视点切换到(1, 1, 1)等轴测位置
N, 1	! 在坐标原点定义第1个结点
N, 2, , , -0.0254	! 在（0, 0, -0.0254m）位置定义第2个结点
E, 1, 2 	! 过1, 2结点定义单元
TYPE, 2	! 将默认的单元类型从弹簧单元, 改变为第2类单元（质量单元）
REAL, 2	! 将默认的实常数从弹簧刚度, 改变为第2类实常数（集中质量）
E, 2 	! 用第2个节点定义第2个单元
M, 2, ROTZ	! 指定2号节点的主自由度为绕X轴的转动自由度ROTZ
! （3）指定输出选项和位移约束
OUTPR, BASIC, 1	! 输出第1阶频率的基本内容
D, 1, ALL	! 约束端点处的第1号节点的所有位移自由度
D, 2, UX, , , , , UY	! 约束2号节点的平移自由度
FINISH	! 退出前处理模块PREP7
! （4）进入求解模块求解
/SOLU	! 加载求解模块
SOLVE	! 开始求解
! （5）提取计算结果
*GET, FREQ, MODE, 1, FREQ	! 提取第1阶模态的频率计算结果, 存入变量FREQ
*STATUS, PARM  	! 显示内存变量的值
FINISH	! 退出后处理模块