利用ANSYS进行断裂分析
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
利用ANSYS进行断裂分析
初次试做断裂分析，希望有这方面经验的高手能发表些经验之谈！这个模型由两种材料组成：表面镀层为铝,基底为钢。目的是对表面镀层的剥离过程进行分析。目前这个模型是个假想的简化模型，初步目标是实现剥离过程的模拟。
裂纹扩展是通过接触单元生死功能实现的。基层和镀层由接触单元连接，然后通过断裂判断准则确定要杀死的失效的接触单元。
第一版(没有加断裂判断准则，强行逐个杀死界面接触单元)：
fini
/clear
/filn,crack1
/PREP7
!*
ET,1,PLANE182
!*
KEYOPT,1,1,2
KEYOPT,1,3,1
KEYOPT,1,4,0
KEYOPT,1,6,0
KEYOPT,1,10,0
!*
rect,0,100,0,100
rect,0,100,100,110
lesi,1,,,10
lesi,2,,,10
esha,2
!*
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,210e3
MPDATA,PRXY,1,,0.3
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,2,,70
MPDATA,PRXY,2,,0.33
amesh,1
lesi,5,,,10
lesi,6,,,2
mat,2
amesh,2
lsel,s,,,3
nsll,s,1
cm,c1,node
lsel,s,,,5
nsll,s,1
cm,t1,node
nsel,s,loc,x
d,all,ux
nsel,s,loc,y
d,all,uy
d,all,ux
mp,mu,3,0
/COM, CONTACT PAIR CREATION - START CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_LINECM,LINE
CM,_AREACM,AREA
/GSA V,cwz,gsav,,temp
MP,MU,3,0
MA T,3
R,3
REAL,3
ET,2,169
ET,3,172
R,3,,,100,0.1,0,
RMORE,,,1.0E20,0.0,1.0,
RMORE,0.0,0,1.0,,1.0,0.5
RMORE,0,0.5,1.0,0.0,
KEYOPT,3,2,0
KEYOPT,3,3,0
KEYOPT,3,4,0
KEYOPT,3,5,0
KEYOPT,3,7,0
KEYOPT,3,8,0
KEYOPT,3,9,0
KEYOPT,3,10,0
KEYOPT,3,11,0
KEYOPT,3,12,5
! Generate the target surface
NSEL,S,,,T1
CM,_TARGET,NODE
TYPE,2
ESLN,S,0
ESURF,ALL
CMSEL,S,_ELEMCM
! Generate the contact surface
NSEL,S,,,C1
CM,_CONTACT,NODE
TYPE,3
ESLN,S,0
ESURF,ALL
ALLSEL
ESEL,ALL
ESEL,S,TYPE,,2
ESEL,A,TYPE,,3
ESEL,R,REAL,,3
/PSYMB,ESYS,1
/PNUM,TYPE,1
/NUM,1
EPLOT
ESEL,ALL
ESEL,S,TYPE,,2
ESEL,A,TYPE,,3
ESEL,R,REAL,,3
CMSEL,A,_NODECM
CMDEL,_NODECM
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM
CMSEL,S,_LINECM
CMDEL,_LINECM
CMSEL,S,_AREACM
CMDEL,_AREACM
/GRES,cwz,gsav
CMDEL,_TARGET
CMDEL,_CONTACT
/COM, CONTACT PAIR CREATION - END lsel,s,,,7
nsll,s,1
cm,s1,node
!Gradient surface load
SFGRAD,PRES,0,X,0,-0.1,
sf,all,pres,-0.1
nsel,all
esel,all
!save
/solu
time,1
deltim,1,1,1
solve
/post1
plns,s,1
anty,,rest
time,1.1
ekill,140
solve
/post1
plns,s,1
/solu
anty,,rest
time,1.2
ekill,140
ekill,139
solve
/post1
plns,s,1
/solu
anty,,rest
time,1.3
ekill,140
ekill,139
ekill,138
solve
/post1
plns,s,1
/solu
anty,,rest
time,1.4
ekill,140
ekill,139
ekill,138
ekill,137
solve
/post1
plns,s,1
第二版(加了断裂自动判断准则)。整整花了半天时间才调试明白。
fini
/clear
/filn,crack1
s1fail=100
eknum=0
flag=0
/PREP7