! 6.6 矩形截面悬壁梁的侧向稳定性分析
! 本程序来源于邢静忠编著的《ANSYS应用实例与分析》，科学出版社，2006年
!
FINISH
/CLEAR
/FILNAME, EX6.6
/TITLE, EX6.6, Lateral Torsional Buckling Analysis of a Cantilever Beam.
! （1）设置图形选项并定义几何模型
/PREP7
/GRA, POWER
K, 1, 0, 0, 0,
K, 2, 1000, 0, 0,
K, 3, 500, 100, 0,
LSTR, 1, 2
! （2）定义单元类型和横截面信息
ET, 1, BEAM189
SECTYPE, 1, BEAM, RECT,
SECDATA, 10, 50
! （3）定义材料特性并定位结点
MP, EX, 1, 210E3
MP, NUXY, 1, 0.0
LSEL, S, , , 1, 1, 1
LATT, 1, , 1, 0, 3, , 1
! （4）对线剖分网格并确认梁的定位
LESIZE, ALL, , , 10
SECNum, 1
LMESH, ALL
/VIEW, , 1, 1, 1
/ESHAPE, 1
EPLOT
! （5）定义边界条件和荷载
DK, 1, ALL
FK, 2, FY, 1
FINISH
! （6）打开预应力选项，开始静力求解
/SOLU
PSTRES, ON
EQSLV, SPARSE
SOLVE
FINISH
! （7）重新进行线性屈曲求解
/SOLU
ANTYPE, BUCKLE
BUCOPT, LANB, 3
MXPAND, 3, , , YES
SOLVE
FINISH
! （8）在后处理模块显示分析结果
/POST1
SET, LIST
SET, 1, 1
PLDisp, 2
FINISH
