[ANSYS應(yīng)用] 重啟動和單元生死的并用

2017-05-27 by:CAE仿真在線來源:互聯(lián)網(wǎng)

一、問題描述

下圖中紫色表示的材料1,藍(lán)色表示的是材料2.材料1為脆性材料,mises應(yīng)力達(dá)到0.8e7Pa時失效,材料2為彈性材料。

分析目的:模擬在豎向荷載作用下材料1的失效過程。

二、施加荷載過程

(1)第一階段

下圖表示的是超過0.8e7的材料1單元;

(2)第二階段

下圖表示的是超過0.8e7的材料1單元;

(3)第三階段

下圖表示的是超過0.8e7的材料1單元;

參考的命令流:

/filname,res1
/PREP7
ET,1,PLANE42
KEYOPT,1,3,2
KEYOPT,1,5,1
KEYOPT,1,6,3

MP,EX,1,2e11
MP,PRXY,1,0.3
MP,EX,2,2e11
MP,PRXY,2,0.3
MP,EX,3,2e6
MP,PRXY,3,0.01
!*
BLC4,0,0,5,5
CYL4,2.5,2.5,1
CYL4,2.5,2.5,1.5

AOVLAP,all
ADELE,2, , ,1

asel,s,,,5
aatt,2,,1

asel,s,,,4
aatt,1,,1

esize,0.1,0
mshape,0,2D
mshkey,0
allsel
amesh,all
everyfy=-0.5e8/100

/solu
nsel,s,loc,y,0
d,all,all
fcum,add,1
nsel,s,loc,y,5
f,all,fy,everyfy

outres,all,all
nropt,full

allsel
time,1
solve
save
finish
/post1
etable,aa,s,eqv
esel,s,etab,aa,0.8e7
esel,r,mat,,2

finish
/solu
*get,elemnum,elem,0,count
*if,elemnum,gt,0,then
ekill,all
esel,s,live
nsle,s,1
nsel,invert
d,all,all,0
*else
allsel
*endif
time,2
*do,i,1,2
nropt,full
allsel
solve
save
finish
/solu
resume
antype,,rest
time,2*i+1
fcum,add,1
nsel,s,loc,y,5
f,all,fy,everyfy

nropt,full
allsel
solve
save
finish

/post1
etable,aa,s,eqv
esel,s,etab,aa,0.8e7
esel,r,mat,,2

finish
/solu
*get,elemnum,elem,0,count
*if,elemnum,gt,0,then
ekill,all
esel,s,live
nsle,s,1
nsel,invert
d,all,all,0
*else
allsel
*endif
time,2*i+2
*enddo
nropt,full
allsel
solve
save
finish