ex8.6.inp

来自「ansys有限元分析程序」· INP 代码 · 共 51 行

! 8.6  用实体单元分析圆环振动
! 本程序来源于邢静忠编著的《ANSYS应用实例与分析》，科学出版社，2006年
!
FINISH
/CLEAR, NOSTART
! （1）定义工程选项、分析类型、单元类型、实常数、模态求解选项和材料参数
/FILNAME, EX8.6
/PREP7
/TITLE, EX8.6, RADIAL VIBRATIONS OF A CIRCULAR RING FROM AN AXISYMMETRIC MODEL.
ANTYPE, MODAL
ET, 1, PLANE25
MXPAND, 1
MP, EX, 1, 207E9
MP, DENS, 1, 7802.2
MP, PRXY, 1, 0
! （2）定义节点和单元
LOCAL, 11, , 0.254
N, 1
N, 2, , 0.00127
! 节点生成命令格式：NGEN, ITIME, INC, NODE1, NODE2, NINC, DX, DY, DZ, SPACE
NGEN, 2, 2, 1, 2, 1, 0.00127
E, 1, 3, 4, 2
CP, 1, UX, 1, 2
M, 1, UX
FINISH
! （3）在求解模块中定义位移约束和模态求解选项后, 开始求解
/SOLU
OUTPR, ALL, 1
D, ALL, UZ, 0
D, 1, UY, 0
MODE, 0, 1
MODOPT, REDUC
SOLVE
! （4）提取计算结果
*GET, FREQ0, MODE, 1, FREQ
FINISH
! （5）重新进入求解模块, 改变位移约束后, 重新进行模态分析
/SOLU
OUTPR, ALL, 1
DDELE, ALL
M, 1, UX, , , UZ
D, 1, UY
MODE, 2, 1
MXPAND, 1, 0, 100
SOLVE
! （6）提取计算结果
*GET, FREQ2, MODE, 1, FREQ
*STATUS, PARM
FINISH