📄 ex4.15(1).inp
字号:
! 4.15 联轴器膜片多工况分析
! 本程序来源于邢静忠编著的《ANSYS应用实例与分析》,科学出版社,2006年
!
FINISH
/CLEAR
/FILNAME, EX4.15(1)
/TITLE, EX4.15(1) Membrance of Axial Connector under Acentric Load.
! (1)设置几何参数
WAIJ=139
NEIJ=95
XIAOJ=11
ZHONGJ=117
THICK=0.4
Pi=3.1415926
! (2)根据对称性,建立实体模型
/PREP7
*AFUN, DEG
PCIRC, NEIJ, WAIJ, 0, 90
CYL4, ZHONGJ*COS(45), ZHONGJ*SIN(45), , , XIAOJ
CYL4, 0, ZHONGJ, , -90, XIAOJ, 90
CYL4, ZHONGJ, 0, , 0, XIAOJ, 180
AOverlap, ALL
ADele, 2, 4, 1, 1
! (3)选取单元,设置材料属性和实常数
ET, 1, SHELL63
MP, EX, 1, 198e3
MP, PRXY, 1, 0.3
MP, DENS, 1, 7.9e-9
R, 1, THICK
! (4)施加小孔上的位移固定条件和惯性力荷载
DL, 5, , ALL, 0
DL, 6, , ALL, 0
DL, 7, , ALL, 0
DL, 8, , ALL, 0
DL, 9, , ALL, 0
DL, 12, , ALL, 0
DL, 15, , UY, 0
DL, 18, , UY, 0
DL, 16, , UX, 0
DL, 17, , UX, 0
NR=2960/60*2*Pi
OMEGA, , , NR
! (5)按照指定单元的大小,将面剖分为面单元
AESize, ALL, 4
AMESH, ALL
Finish
! (6)进入求解模块求解
/solu
Solve
Finish
! (7)进入一般后处理模块显示结果
/post1
PLNSol, s, eqv
PLNSol, s, 1
PLNSol, s, 3
FINISH
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -