- 1、本文档共4页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
/FILNAME,Box,1 !定义工作文件名。
/TITLE, Stability Analysis !定义工作标题。
/PREP7
!定义单元。
ET,1,SHELL181
!定义材料属性。
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,2.06e5
MPDATA,PRXY,1,,0.3
MPTEMP,,,,,,,,
MPTEMP,1,0
! 定义壳单元的实常数100。
sect,100,shell,,
secdata, 0.1,1,0.0,3
secoffset,MID
seccontrol,,,, , , ,
! 定义壳单元的实常数200。
sect,200,shell,,
secdata, 1,1,0,3
secoffset,MID
seccontrol,0,0,0, 0, 1, 1, 1
/VIEW,1,1,1,1 !调整图形窗口视角。
/ANG,1
/REP,FAST
!建立几何模型。
K,1,200,,200,
K,2,200,,-200,
K,3,-200,,-200,
K,4,-200,,200,
FLST,2,4,3
FITEM,2,1
FITEM,2,2
FITEM,2,3
FITEM,2,4
A,P51X
VOFFST,1,850, ,
VDELE, 1
!以上完成几何模型。
!以下进行网格划分。
FLST,5,12,4,ORDE,2
FITEM,5,1
FITEM,5,-12
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
LESIZE,_Y1,40, , , , , , ,1 !定义单元网格大小。
TYPE, 1 !网格划分。
MAT, 1
REAL,
ESYS, 0
SECNUM, 100
FLST,5,4,5,ORDE,2
FITEM,5,3
FITEM,5,-6
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CHKMSH,AREA
CMSEL,S,_Y
AMESH,_Y1
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
TYPE, 1
MAT, 1
REAL,
ESYS, 0
SECNUM, 200
FLST,5,2,5,ORDE,2
FITEM,5,1
FITEM,5,-2
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CHKMSH,AREA
CMSEL,S,_Y
AMESH,_Y1
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2 !网格划分完成。
!进入求解模块。
FINISH
/SOL
!施加底面约束。
FLST,2,1,5,ORDE,1
FITEM,2,1
/GO
DA,P51X,ALL, !施加底面约束完成。
!施加载荷。
FLST,2,4,3,ORDE,2
FITEM,2,5
FITEM,2,-8
/GO
FK,P51X,FY,-1 !施加载荷完成。
!求解带预应力静力解。
PSTRES,1
/STATUS,SOLU ! 预应力静力求解。
SOLVE
!进行特征值屈曲分析。
FINISH
/SOLUTION
ANTYPE,1
BUCOPT,LANB,3,0,0
MXPAND,3,0,0,1,0.001,
/STATUS,SOLU ! 特征值屈曲分析求解。
SOLVE
!进行非线性屈曲分析计算。
FINISH
/SOL
ANTYPE,0
ANTYPE,0
NLGEOM,1
NSUBST,60,0,0
OUTRES,ERASE
OUTRES,ALL,ALL
ARCLEN,1,10,1e-7
AUTOTS,-1.0
NCNV,1,2,0,0,0 ! 非线性求解设置。
/PREP7
UPGEOM,0.005,1,1,Box,rst, ! 设置几何初始缺陷。
! 设置载荷。
FINISH
/SO
文档评论(0)