/nopr -S\gDB bb
keyw,pr_struc,1 _2Zc?*4
/prep7 u~rPqBT{d3
/pnum,kp,1 8'WoG]E_
/pnum,line,1 ;Mw<{X-
/pnum,area,1 "L4ZE4|)
et,1,beam3 B*Z}=$1j
et,2,plane42 wjtFZGx&
keyopt,2,3,2 h`i*~${yg
r,1,0.15,0.000281,0.15 @LSfP
mp,ex,1,23e9 Vh ?5
mp,prxy,1,0.2 kz0pX-@b
mp,dens,1,2500 W3+;1S$k
mp,ex,2,8e9 `d c&B
mp,prxy,2,0.28 2CMWJi
mp,dens,2,2400 B,V:Qs6"
tb,dp,2,,, J]W?
Vvv
tbmodif,1,1,1.2e6 / jLb{Ky
tbmodif,1,2,42 i/{dD"HwM
mp,ex,3,16e9 >O]u4G!
mp,prxy,2,0.28 J,G/L!Bp
mp,dens,2,2500 hKVb#|$
tb,dp,3,,, lvOM1I
tbmodif,1,1,2.4e6
"tT68
tbmodif,1,2,50 4 :phq
save vRkVPkZ6|
k,1,-2.5 VwN=AFk
Oj
k,2,-2.5,4 3>>Ca;>$
k,3,-5.4 k1'd';gQ
k,4,-5.4,5 8q]_> X
k,5,-42,-12 sWyx_
k,6,-24,-12 ?`=
<*{_o
k,7,-2.5,-12 we0haK
k,8,-42 ~@#s<a,%;
k,9,-24 t/lQSUip
k,10,-42,15 %)ri:Q q
k,11,-24,15 ;.66phe
k,12,-42,39 lLur.f
k,13,-24,39 &( ZEs c
k,14,-2.5,-1 5{gv\S1
k,15,2.5,4 -G[TlH06
k,16,5.4,5 Xv+!)j<
l,5,6 z? Iu;X
l,6,7 .PD_Vv>C/>
l,8,9 `*o ko[\3
l,9,3 EG8%X "p
l,10,11 4`Cgz#v
{
l,12,13 ux8K$$$
l,5,8 Zd|u>tn
l,6,9 C>Q|"Vf2
l,7,14 Bx/)Sl@
l,14,1 Z*R~dHr
l,8,10 !a4`SjOgu
l,9,11 a|5<L
l,10,12 ~#jnkD
l,11,13 @.,Mn#
l,1,3 Cp?6vu|RA
al,1,8,3,7 xyP0haE
al,2,9,10,15,4,8 _b`/QSL
al,3,12,5,11 \#v(f2jPF
al,5,14,6,13 t*`G@Nj
arsymm,x,all,,,,0,0 5g`J}@"k
k,29 ta@fNS4
k,30,0,1.99 $azK M,<q
circle,30,2.81 _1jbNQa
ldele,33,34,1 }tW1\@
=
l,1,2 DW>O]\I
lsbl,32,33 4j}.=u* X7
l,1,35 >uo=0=9=
ldele,35 DoNN;^H
l,23,15 "yK)9F[9Mo
lsbl,31,33 Qe0?n
l,23,2 Xyu0np;@
ldele,35 SBaTbY0
circle,30,5.71 .E9$j<SP-
ldele,37,38,1 4av
l,3,4 HqI[]T@
lsbl,35,37 9e7):ZupO
l,3,39 9.:&u/e
ldele,39 hh$i1n
l,24,16
,
{}S<^?]
lsbl,33,37 RWB]uHzE
l,4,24 dP<i/@21Wm
ldele,39 = Qn8Y`U
kdele,34 *'BI=*`
kdele,38 BC85#sbl
kdele,30 ~<}?pDA}~
kdele,31 v+i==vxg
kdele,15 &gP1=P,!
kdele,37 E Uq6)
K
kdele,33 L*P*^I^1
k,40,,15 /IG3>|R
k,41,,39 R2qz>kyyB
l,7,21 J[UTn'M8]
l,14,22 g2vt(Gf ;
l,1,29 7CCSG{k
l,29,23 M=fhRCUB
l,11,40 /GO((v+J
l,40,25 9%dO"t$-q
l,13,41 ZftucD|ZY/
l,41,27 z<s~`
l,29,32 gF]IAZCi
l,32,36 U ZL-mF:)&
l,36,40 ?btX&:j2P
l,40,41 -aDBdZ;y
al,4,35,38,49,43,12 %C)|fDwN
al,43,50,45,14 6J965eM'[
al,24,25,44,49,40,33 +3pfBE|
al,44,28,46,50 )7m.n%B!5V
al,42,31,36,47 1`1Jn*|TI
al,41,47,34,32 Qqd +=mgc
al,15,32,34,48,38,35 t4p-pH'9b
al,23,33,40,48,36,31 m:g%5'qDZ
ldele,39 &!*p>Ns)e
k,42,0,-1 ?U,Xy xN
l,7,21 ^fU,9
l,22,42 0a+U >S#
l,14,42 BO 3z$c1yU
al,37,21,39,51,9 r2&/Ii+
al,51,39,22,42,41,10 yg%T{hyzH
save 1y7$"N8Xo
lesize,1,6 ai)?RF
lesize,3,6 >BjZ{7?Ok
lesize,5,6 cMfnc.P\K
lesize,6,6 R;w1& Z
lesize,16,6 K&&YxX~3
lesize,18,6 G)=+Nt\*
lesize,26,6 UFE~6"t(
lesize,29,6 S3dcE"hg
lesize,2,3 ab5i7@Ed
lesize,4,3.33 .Zx7+`i
lesize,15,1.45 VKr
oikz@]
lesize,43,8 UmCIjwk
lesize,2,3 ([ hd
lesize,4,3.33 /j:-GJb*!u
lesize,15,1.45 }
ejc
lesize,43,8 ]Wc 2$
lesize,45,8 \U?{m)N
lesize,20,3 Bs-MoT!
lesize,24,3.33 "'c
=(P
lesize,23,1.45 $t>ow~Xi
lesize,44,8 peU1
t:k?
lesize,46,8 Wp=:|J
lesize,37,0.417 "oCXG`.k&
lesize,51,0.417 Byns6k
lesize,39,0.417 M'xG.'
lesize,41,0.417 lW@i,1
lesize,42,0.417 W0Q;1${
lesize,34,1.0273 j2:A@a6
lesize,36,1.0273 lJ<(
mVt
lesize,38,2.365 .7H*F9
lesize,40,2.365 9riKSp:5
lesize,7,2 ld'Aaxl&
lesize,8,2 E"%G@,|3*
lesize,9,2.2 ;4(FS
lesize,10,1 T( bFn?
lesize,21,2.2 3q1u9`4;
lesize,22,1 }/z\%Y
lesize,17,2 }x:nhy`
lesize,19,2
EJO6k1
lesize,11,5 K/LoHWy+n*
lesize,12,5 -MeO|HWm
lesize,25,5 tP/R9Ezp
lesize,27,5 j=w`%nh4"f
lesize,35,1.282 gx6$:j;
lesize,32,1.6365 ?;Ge/~QU5
lesize,33,1.282 yl~h
`b4
lesize,31,1.6365 J_ `\}55n
lesize,47,0.8 >l!DWi6
lesize,48,1.45 _ 6'HBE
lesize,49,1.316 +DP{ _x)t
lesize,13,4 f<( ysl1[
lesize,14,4 1)h+xY
lesize,50,4 y:8Oc?
lesize,28,4 3.I:`>;EO
lesize,30,4 \YsYOFc|
lesize,10,1 (yi{<$U*
lesize,22,1 jiAN8t*P
加固圈单元划分 r1X\$&
type,2 !4
G9`>n
mat,3 [y$sJF7;I
real,1 54,
( ;
amesh,15 Kg;1%J>ee
amesh,16
9p<ZSh
划分开挖土体网格 V$<5`
type,2 m-!Uy$yM
mat,2 eI*o9k$Qs
real,1 W%cJ#R[o
amesh,13 .TetN}w
amesh,14 tsu Mt
save ~!W{C_*N
划分未开挖土体 *f$wmZ5A
amap,17,7,21,22,14 v}\Nx[}
amap,18,14,22,23,1 gEU|Bx/!=
amap,2,6,7,1,9 ,_2ZKO/k$
amap,9,9,3,36,40,11 7q[a8rUdh
amap,6,21,18,19,23 V3$Yr"rZ;
amap,11,19,24,36,40,25 o@KK/f
amesh,1 <Xr{1M D
amesh,3 S&YC"
amesh,4 2hI|]p
amesh,5 *R6Ed
amesh,7 :;]iUjiC8
amesh,8 Ljjuf=]
amesh,10 $,~D-~-
amesh,12 J
M,ndl
save Grw|8xN0t
初喷砼单元设置 O
o+pi$W
type,1 S(
r Fa
mat,1 G\1\L*+0
real,1 Q4,!N(>D
e,1,15 WD7IF+v
e,15,16 5u-jjUO
e,16,12 9vZD?6D,n
e,12,14 cRhu]fv()
e,14,13 N3J;_=<4
e,13,10 '{?7\+o.x
e,10,32 A7qKY-4B
e,32,31 G F-\WD
e,31,30 G&HCOR!h
e,30,34 [_h/DhC:+
e,34,33 (}u2) 9
e,33,22 C.[abpc
save z.q^`01/H
finish $Dm2>:Dmt
加载与初始地应力求解 MIJ^n(-G
/sol x4C}AyR
allsel,all Ej]:j8^W
nsel,s,loc,y,-12 6RLYpQ$+
d,all,,,,,,uy,,,,, +(-L
nsel,s,loc,x,-42 %cl=n!T
nsel,a,loc,x,42 |aovZ/b4
d,all,,,,,,ux,,,,, $R2iSu{kO
施加重力加速度 U- UD27
acel,0,10,0, <!s+X_^
save =x/Ap1
esel,s,type,,1 pp#xN/V#a
ekill,all U2u\Q1
save Gb\Nqx(
nropt,full,, NM;0@ o
deltim,100,20,1000 8i=c|k,GL.
allsel,all tJ
NJS
outres,all,all 1sqBBd"=PY
solve B8Cic\2
finish ,X05&'@Z
save ebSG|F
/post1 q`l%NE
plnsol,u,y,1竖向位移 ,u1Yn}
plnsol,s,y,0,1应力 T5g}z5~"
plnsol,s,1,0,1第一主应力 ;|.^_Xs
plnsol,s,3,0,1第三主应力 ]b"Oy}ARW
finish *t JgQ[
4Y)rgLFj
开挖隧洞土体 O"$uw
/sol \CP)$0j-&o
allsel,all &G)I|mv
antype,,rest,1,1,0 CHeU?NtFps
asel,s,area,,13,14,1 _bi]Bpxf
asel,a,,,18 Z-fQ{&a{
esla,r,1 8T7E.guYr
ekill,all QU]&q`GE
进行初期支护 Vy:I[@6@+
allsel,all L|wD2iw
esel,s,type,,1 K/,y"DUN&
flst,2,12,2 7S_rN!E1i*
fitem,2,445 QxSJLi7t
fitem,2,-456 5,I|beM
ealive,p51x *v}8n95*2
save F3XB};
finish TzC'xWO
施加节点荷载 :ub 4p4h*
节点力计算 Df\~ ZWs!
/post1 WUwH W
allsel,all g ni=S~u
esel,s,type,,2 .$r=:k_d
flst,3,27,2 O T*C7=
fitem,3,7 IMKyFp]h-
fitem,3,-12 J4yL"iMt
fitem,3,18 yMU>vr
fitem,3,-24 `OL@@`'^{S
fitem,3,198 jT~PwDSFt3
fitem,3,282 0]3 ,0s $}
fitem,3,139 \(ygdZ{R
fitem,3,-150 Rqi=AQ
esla,r,1 e;+6U"Jx*
nforce,all 4GA9oLl
JnWG_|m)
这个命令还存在些问题,请高手指教。