! 5.3  柱形容器在內(nèi)壓作用下的靜力分析
! 本程序來源于邢靜忠編著的《ANSYS應(yīng)用實(shí)例與分析》，科學(xué)出版社，2006年
!
FINISH
/CLEAR, NOSTART
! (1)定義工程選項(xiàng), 單元類型、實(shí)常數(shù)和材料參數(shù)
/FILNAME, EX5.3
/PREP7
/TITLE, EX5.3, CYLINDRICAL SHELL UNDER INTERNAL PRESSURE.
ANTYPE, STATIC
ET, 1, SHELL51
R, 1, 25.4
MP, EX, 1, 207E3
MP, NUXY, 1, 0.3
! (2)定義節(jié)點(diǎn)和單元
N, 1, 1524
N, 2, 1524, 254
E, 1, 2
! (3)定義耦合自由度、位移約束和荷載力
CP, 1, UX, 1, 2
D, 1, UY, , , , , UZ, ROTZ
D, 2, ROTZ
F, 2, FY, 25155716
SFE, 1, 1, PRES, , 3.4476
FINISH
! (4)在求解模塊中，設(shè)置輸出選項(xiàng)后求解
/SOLU
OUTPR, ALL, 1
SOLVE
FINISH
! (5)在后處理模塊定義單元表, 提取單元應(yīng)力
/POST1
ETABLE, STRS_Y, NMISC, 7
ETABLE, STRS_Z, NMISC, 6
*GET, STRSS_Y, ELEM, 1, ETAB, STRS_Y
*GET, STRSS_Z, ELEM, 1, ETAB, STRS_Z
*STATUS, PARM
FINISH