13.2-实例——圆盘边缘屈曲分析

/FILNAME,yuanpan,0/TITLE,largedisplacementanaylsisofaplane!设定分析作业名和标题!*/PREP7!*ET,1,PLANE182!定义单元类型!*KEYOPT,1,1,3KEYOPT,1,3,1!*使其可用于计算轴对称问题!*MPTEMP,,,,,,,,MPTEMP,1,0MPDATA,EX,1,,2.06e11MPDATA,PRXY,1,,0.3!定义材料属性BLC4,,,10,0.01!建立圆盘的截面FLST,5,1,4,ORDE,1FITEM,5,3CM,_Y,LINELSEL,,,,P51XCM,_Y1,LINECMSEL,,_Y!*LESIZE,_Y1,,,100,,,,,1!*MSHAPE,0,2DMSHKEY,1!*CM,_Y,AREAASEL,,,,1CM,_Y1,AREACHKMSH,'AREA'CMSEL,S,_Y!*AMESH,_Y1!*CMDELE,_YCMDELE,_Y1CMDELE,_Y2!*!对盘的截面进行网格划分FINISH/SOLDL,4,,SYMM!加轴对称的位移FLST,2,1,4,ORDE,1FITEM,2,2!*/GODL,P51X,,ALL,!施加固定位移/AUTO,1/REP,FASTFLST,2,1,4,ORDE,1FITEM,2,1/GO!*SFL,P51X,PRES,1e6,!*!施加压力载荷CNVTOL,F,,0.001,2,1,!*ANTYPE,0NLGEOM,1/STATUS,SOLUSOLVEFINISH!进行求解设置并求解/POST1!*/EFACET,1PLNSOL,U,Y,1,1.0!查看变形/AUTO,1/REP,FASTSET,1,LAST,1,!**GET,UY,NODE,1,U,Y!*AVPRIN,0,CENT,ETABLE,SEQUENCE,LS,5!*!*!列表查看位移NSORT,U,Y,0,0,5,0!*!**GET,PRSCNT,SORT,,MAX*STAT!**GET,PRSCNT,SORT,,MAX!**GET,PRSCNT,SORT,,MAXPLETAB,SEQUENCE,AVG!*/EFACET,1PLNSOL,U,SUM,0,1.0prnsol,,SAVESAVEFINISH