1、! Define the Element! 定义单元/PREP7!*ET,1,SHELL93!*! Define the section for shells! 定义壳单元截面R,1,0.1,0.1,0.1,0.01, , ,!*! Define the material! 定义材料MPTEMP,MPTEMP,1,0MPDATA,EX,1,200e9MPDATA,PRXY,1,.3! Setup the model! 建模! Define the keypoints! 定义关键点k,1,0,0,0k,2,4,0,0k,3,4,4,0k,4,0,4,0! Define the lines! 定义
2、线l,1,2l,2,3l,3,4l,4,1! Define the section area! 定义截面a,1,2,3,4! Extrude a volumn from area! 从面拉伸得到体VEXT,1, , ,0,0,10,! Delete useless volumn and areas! 删除不必要的体和面VDELE, 1ADELE,1,2,1! Mesh! 划分网格ESIZE,0.5,0,AMESH,ALL!*FINISH/SOL! Fixed end! 固定端部DL,1, ,ALL,DL,2, ,ALL,DL,3, ,ALL,DL,4, ,ALL,! Give the pres
3、sure on the top surface! 顶部施加压力SFA,5,2,PRES,1SOLVEFINISH/POST1! Display the deformation! 绘制变形PLDISP,0! Select the mid-section of the shells! 选定壳中部截面shell,mid! Define a path to plot the stress! 定义一个路径来绘制应力PATH,MidPath1,4,30,20,! Define path with nodes! 用节点来定义路径PPATH,1,89PPATH,2,34PPATH,3,570PPATH,4,1
4、066PATH,STAT!*AVPRIN,0,0,!*! Map stress Z to the path! 将 Stress Z 映射到路径PDEF, ,S,Z,AVG/PBC,PATH, ,0! Plot the stress! 绘制应力PLPATH,SZFINISH=! Define the Element! 定义单元/PREP7!*ET,1,SHELL93!*! Define the section for shells! 定义壳单元截面R,1,4, , , , , ,!*! Define the material! 定义材料MPTEMP,MPTEMP,1,0MPDATA,EX,1,2
5、00e9MPDATA,PRXY,1,.3! Setup the model! 建模! Define the keypoints! 定义关键点K,1,-75,60,0k,2,75,60,0K,3,75,40,0k,4,17,40,0K,5,-17,40,0K,6,-75,40,0k,7,-75,-40,0K,8,-17,-40,0k,9,17,-40,0K,10,75,-40,0k,11,75,-60,0K,12,-75,-60,0! Define the lines! 定义线l,1,2l,2,3l,3,4l,4,9l,9,10l,10,11l,11,12l,12,7l,7,8l,8,5l,5,6l,6,1! Define the section area! 定义截面a,1,6,5,8,7,12,11,10,9,4,3,2,1! Extrude a volumn from area! 从面拉伸得到体VEXT,1, , ,0,0,-2500,! Delete useless volumn and areas! 删除不必要的体和面VDELE, 1ADELE,1,2,1ESIZE,10,0,AMESH,ALL!*FINISH/eshape,1eplot
