ANSYS实例分析报告连拱隧道开挖命令流.doc
文本预览下载声明
!III级围岩,二维,全断面开挖
/cle
/filname,ch-three-2D,1
!几何参数
!计算外围区域
*set,x1,-60
*set,x2,60
*set,y1,-30
*set,y2,50
*set,l1,3.5 !锚杆长度
*set,r1,0.0125 !锚杆半径
*set,th1,0.15 !初次衬砌厚度
*set,th2,0.05 !中导洞喷层厚
!材料参数
!中隔墙
*set,ec25,29.5e9
*set,uc25,0.2
*set,dens25,2500
!喷射混凝土
*set,ec20,21e9
*set,uc20,0.2
*set,dens20,2200
!锚杆
*set,el,170e9
*set,ul,0.3
*set,densl,7800
!围岩
*set,er,6e9
*set,ur,0.28
*set,densr,2500
*set,cr,0.8e6
*set,fir,40
/prep7
!定义单元类型
et,1,plane42
keyopt,1,3,2 !平面应变问题
et,2,beam3
keyopt,2,6,1 !打开输出内力选项
et,3,link1
!定义实常数
r,1,th1,th1/12,th1
r,2,th2,th2/12,th2
r,3,3.1415926*r1**2
!几何建模
!建中隔墙
k,1,-3,-1.69
k,2,-3,-0.89
k,3,-3,-0.37
k,4,-1.33552,-0.37
k,5,-0.95134,1.57593
k,6,-1.25121,3.53662
k,7,1.25121,3.53662
k,8,0.95134,1.57593
k,9,1.33552,-0.37
k,10,3,-0.37
k,11,3,-0.89
k,12,3,-1.69
l,1,2
l,2,3
l,3,4
larc,4,6,5
larc,6,7,5,3
larc,7,9,8
l,9,10
l,10,11
l,11,12
l,12,1
!左侧围岩及锚杆圈
k,13,-3,0.81
k,14,-2.52524,2.42963
k,15,-1.483023,4.11778
k,16,-1.77650,4.67036
k,17,-2.058364,5.09399
k,18,-2.37658,5.49104
k,19,-2.734606,5.864085
k,20,-3.12567,6.20235
k,21,-5.88951,7.72342
k,22,-9,8.25
k,23,-12.11049,7.72342
k,24,-14.8743,6.20235
k,25,-16.57763,3.97894
k,26,-17.02812,1.21456
k,27,-16.9,-0.89
k,28,-20.4,-0.89
k,29,-20.51567,0.91966
k,30,-19.7906,5.36705
k,31,-17.05,8.944
k,32,-13.26253,11.02838
k,33,-9,11.75
k,34,-4.146154,10.80594
k,35,0,8.11142
k,36,1.143324,6.85081
!导洞左侧圈
l,3,13
larc,13,6,14
!左侧开挖圈
larc,6,16,15
larc,16,18,17
larc,18,20,19
larc,20,22,21
larc,22,24,23
larc,24,26,25
l,26,27
!锚杆圈
l,28,29
larc,29,31,30
larc,31,33,32
larc,33,35,34
l,35,36
!内圈线合并
lcomb,15,16
lcomb,15,17
lcomb,15,18
lcomb,15,19
!外圈线合并
lcomb,20,21
lcomb,20,22
lcomb,20,23
numcmp,all
ldiv,14,,,2
ldiv,15,,,36
ldiv,16,,,36
ldiv,17,,,2
kdele,19,22,1
kdele,25,27,1
numcmp,all
kdele,17
numcmp,all
!锚杆线(40根,含建3维时可用的另外20根锚杆)
l,16,21
l,22,93
l,17,20
*do,i,23,57,1
l,i,115-i
*enddo
l,18,19
l,18,2
numcmp,all
!内层细化区域
k,100,-16.9,-1.69
k,101,-20.4,-1.69
k,102,-24.9,-1
显示全部