[ANSYS应用] 重启动和单元生死的并用

2017-05-27 by:CAE仿真在线来源:互联网

一、问题描述

下图中紫色表示的材料1,蓝色表示的是材料2.材料1为脆性材料,mises应力达到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