finish
/cle
/filename,suidao
/title,anlysis of suidao in 3d
/PREP7 !进入前处理器
ET,1,mesh200,6
et,2,solid45
R,1,0.4,0.4,0.4,0.4, !设置梁单元几何常数
MP,EX,1,8e9 !围岩
MP,PRXY,1,0.28 !输入泊松比
MP,DENS,1,2400 !输入密度
TB,DP,1,,,
tbdata,1,1.2e6,42,19
MP,EX,2,8e9 !锚杆加固区
MP,PRXY,2,0.28 !输入泊松比
MP,DENS,2,2400
TB,DP,2,,,
tbdata,1,1.2e6,42,20
MP,EX,3,8e9 !开挖土体
MP,PRXY,3,0.28 !输入泊松比
MP,DENS,3,2400
TB,DP,3,,,
tbdata,1,1.2e6,42,21
MP,EX,4,8e9 !衬砌区
MP,PRXY,4,0.28 !输入泊松比
MP,DENS,4,2400
CSYS,0
k, 1 ,.000,.439,.000,
k, 2 ,-2.839,-2.697,.000,
k, 3 ,2.839,-2.697,.000,
k, 4 ,-1.521,-3.508,.000,
LARC,2 ,3 ,4
k, 5 ,.000,2.587,.000,
k, 6 ,1.903,4.490,.000,
k, 7 ,-1.903,4.490,.000,
k, 8 ,1.030,5.073,.000,
LARC,6 ,7 ,8
k, 9 ,.650,1.937,.000,
k, 10 ,-2.892,2.635,.000,
k, 11 ,-2.251,4.086,.000,
LARC,7 ,10 ,11
k, 12 ,6.674,.750,.000,
k, 13 ,-3.047,.000,.000,
k, 14 ,-2.998,1.982,.000,
LARC,10 ,13 ,14
l, 2 ,13
k, 15 ,2.065,4.653,.000,
k, 16 ,-2.066,4.653,.000,
k, 17 ,1.118,5.286,.000,
LARC,15 ,16 ,17
k, 18 ,-3.118,2.680,.000,
k, 19 ,-2.436,4.223,.000,
LARC,16 ,18 ,19
k, 20 ,-3.276,-.018,.000,
k, 21 ,-3.226,2.011,.000,
LARC,18 ,20 ,21
k, 22 ,-3.059,-2.840,.000,
l, 22 ,20
