ANSYS钢筋混凝土板开裂实例.docx

分离式模型：混凝土SOLID65单元，钢筋LINK180单元；

粘接滑移：不考虑；

加载方式：在中心点处施加-2mm的位移；

支座：面约束；

模型大小：3040mm*3040mm*80mm的板，钢筋直径8mm，保护层厚度20mm；四个角放置320mm*320mm*50mm的垫板；

n,1,,h

n,9

fill,1,9

ngen,2,9,1,9,1,,,20

ngen,31,9,10,18,1,,,100

ngen,2,9,280,288,1,,,20

ngen,2,297,1,297,1,20

ngen,31,297,298,594,1,100

ngen,2,297,9208,9504,1,20

type,3

real,1

mat,2

e,16,313

*do,ii,313,9223,297  $e,ii,ii 297  $*enddo

e,9223,9520

egen,16,18,1,32

*do,ii,304,583,9  $e,ii,ii 9  $*enddo

egen,16,594,514,545

blc4,,,3040,h,3040

blc4,,,320,-50,320

wpoff,3040,0,0

blc4,,,-320,-50,320

wpoff,0,0,3040

blc4,,,-320, -50, -320

wpoff,-3040,0,0

blc4,,,320,-50,-320

wpcsys,-1

wpoffs,20

wprota,,,90

vsbw,all

wpoffs,,,300

vsbw,all

wpoffs,,,2400

vsbw,all

wpoffs,,,300

vsbw,all

wpcsys,-1

wpoffs,,,20

vsbw,all

wpoffs,,,300

vsbw,all

wpoffs,,,2400

vsbw,all

wpoffs,,,300

vsbw,all

wpcsys,-1

allsel

lsel,s,loc,y,40  $lesize,all,,,4  $lsel,all

lsel,s,loc,y,80  $lsel,r,loc,x,0  $lsel,r,loc,z,0,20  $lesize,all,,,1

lsel,s,loc,y,80  $lsel,r,loc,x,0  $lsel,r,loc,z,20,3020  $lesize,all,50

lsel,s,loc,y,80  $lsel,r,loc,x,0  $lsel,r,loc,z,3020,3040  $lesize,all,,,1

lsel,s,loc,y,80  $lsel,r,loc,z,0  $lsel,r,loc,x,0,20  $lesize,all,,,1

lsel,s,loc,y,80  $lsel,r,loc,z,0  $lsel,r,loc,x,20,3020  $lesize,all,50

lsel,s,loc,y,80  $lsel,r,loc,z,0  $lsel,r,loc,x,3020,3040  $lesize,all,,,1

vsel,s,loc,y,0,h

vatt,1,2,1

mshape,0,3d

mshkey,1

vmesh,all

Allsel

vsel,s,loc,y,-25  $vatt,2,2,2 

mshape,0,3d     $mshkey,1   $vmesh,all     $Allsel

nummrg,all

numcmp,all

finish