资源描述:
《ansys断裂例子》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、第一版(没有加断裂判断准则,强行逐个杀死界面接触单元):fini/clear/filn,crack1/PREP7!*ET,1,PLANE182!*KEYOPT,1,1,2KEYOPT,1,3,1KEYOPT,1,4,0KEYOPT,1,6,0KEYOPT,1,10,0!*rect,0,100,0,100rect,0,100,100,110lesi,1,,,10lesi,2,,,10esha,2!*MPTEMP,,,,,,,,MPTEMP,1,0MPDATA,EX,1,,210e3MPDATA,PRXY,1,,0.3MPTEMP
2、,,,,,,,,MPTEMP,1,0MPDATA,EX,2,,70MPDATA,PRXY,2,,0.33amesh,1lesi,5,,,10lesi,6,,,2mat,2amesh,2lsel,s,,,3nsll,s,1cm,c1,nodelsel,s,,,5nsll,s,1cm,t1,nodensel,s,loc,xd,all,uxnsel,s,loc,yd,all,uyd,all,uxmp,mu,3,0/COM,CONTACTPAIRCREATION-STARTCM,_NODECM,NODECM,_ELEMCM,ELEMC
3、M,_LINECM,LINECM,_AREACM,AREA/GSAV,cwz,gsav,,tempMP,MU,3,0MAT,3R,3REAL,3ET,2,169ET,3,172R,3,,,100,0.1,0,RMORE,,,1.0E20,0.0,1.0,RMORE,0.0,0,1.0,,1.0,0.5RMORE,0,0.5,1.0,0.0,KEYOPT,3,2,0KEYOPT,3,3,0KEYOPT,3,4,0KEYOPT,3,5,0KEYOPT,3,7,0KEYOPT,3,8,0KEYOPT,3,9,0KEYOPT,3,10
4、,0KEYOPT,3,11,0KEYOPT,3,12,5!GeneratethetargetsurfaceNSEL,S,,,T1CM,_TARGET,NODETYPE,2ESLN,S,0ESURF,ALLCMSEL,S,_ELEMCM!GeneratethecontactsurfaceNSEL,S,,,C1CM,_CONTACT,NODETYPE,3ESLN,S,0ESURF,ALLALLSELESEL,ALLESEL,S,TYPE,,2ESEL,A,TYPE,,3ESEL,R,REAL,,3/PSYMB,ESYS,1/PNU
5、M,TYPE,1/NUM,1EPLOTESEL,ALLESEL,S,TYPE,,2ESEL,A,TYPE,,3ESEL,R,REAL,,3CMSEL,A,_NODECMCMDEL,_NODECMCMSEL,A,_ELEMCMCMDEL,_ELEMCMCMSEL,S,_LINECMCMDEL,_LINECMCMSEL,S,_AREACMCMDEL,_AREACM/GRES,cwz,gsavCMDEL,_TARGETCMDEL,_CONTACT/COM,CONTACTPAIRCREATION-ENDlsel,s,,,7nsll,s
6、,1cm,s1,node!GradientsurfaceloadSFGRAD,PRES,0,X,0,-0.1,sf,all,pres,-0.1nsel,allesel,all!save/solutime,1deltim,1,1,1solve/post1plns,s,1/soluanty,,resttime,1.1ekill,140solve/post1plns,s,1/soluanty,,resttime,1.2ekill,140ekill,139solve/post1plns,s,1/soluanty,,resttime,1
7、.3ekill,140ekill,139ekill,138solve/post1plns,s,1/soluanty,,resttime,1.4ekill,140ekill,139ekill,138ekill,137solve/post1plns,s,1第二版(加了断裂自动判断准则)。整整花了半天时间才调试明白。fini/clear/filn,crack1s1fail=100!定义断裂准则:断裂应力=100eknum=0flag=0/PREP7!*ET,1,PLANE182!*KEYOPT,1,1,2KEYOPT,1,3,1KE
8、YOPT,1,4,0KEYOPT,1,6,0KEYOPT,1,10,0!*rect,0,100,0,100rect,0,100,100,110lesi,1,,,10lesi,2,,,10esha,2!设置单元形状4边形!*MPTEMP,,,,,,,,!定义材料1MPTEMP,