A1WU K=P
new t@q'm.:uw<
gen zone brick p0 0 0 0 p1 60 0 0 p2 0 9.9 0 p3 0 0 15 size 20 5 5 Cux(v8=n
;gen zone brick p0 20 0 0 p1 60 0 0 p2 20 9.9 0 p3 20 0 15 size 20 3 5 ratio 1.1 Ndmt$(b
;gen zone brick p0 30 0 0 p1 60 0 0 p2 30 9.9 0 p3 30 0 15 size 6 2 3 y<)TYr
;attach face range x 19.9 20.1 j8Z, :op
;attach face range x 29.9 30.1 80xr zv
7 Cgi&
N8<J'7%
model elas rzjVUPdnh
prop bulk 3.58e10 shear 1.65e10 dens 2000 $( h T{C,K
dzVi ~wt_&
,:_c-d#
set grav 0 0 -10.0 jHL s
5%
ini szz -3.0e5 grad 0,0,2e4 ua\ t5M5
apply szz -20e3 range x 21.0 31.0 y 4.5 5.5 z 14.9 15.1 0I}e>]:I
fix x range x -0.1 0.1 mU'<:gL+
fix x y z range x 59.9 60.1 .3!Wr*o
fix y range y -0.1 0.1 Lvk}% ,S8t
fix y range y 9.8 10.0 mx c)Wm<4
fix x y z range z -0.1 0.1 Z\&f"z ?L
;hist unbal G\.~/<Mg+
;plot add hist 1 . "M s7=
8tY>%A~^z
IwYeKN6s
step 2000 h I[}
-
ini xdisp 0.0 ydisp 0.0 zdisp 0.0 PEMkx"h +
;ini state 0 7A i?}%b-
model mohr .`or^`X3
prop bu 3.58e6 sh 1.65e6 coh 24.1e3 fric 5.8 dens 1800 range z 15.0 14.0 TpjiKM
prop bu 3.58e6 sh 1.65e6 coh 24.1e3 fric 5.8 dens 2531 range z 14.0 0.0 >{#JIG.
prop bu 8.6e8 sh 4.0e8 coh 5.06e5 fric 7.0 dens 1900 range x 20.0 20.8 z 3.0 15.0 Epzg|L1)
;plot add fap black outside on )6|L]'dsZ
;plot add cont zdis out on 7"(!]+BW!O
;plot add axes black J<) qw
set large rhv~H"qzW
v.0qE}'
|
j=\h|^gA
sel pile begin=(20.3,5.0,15.0) end=(20.3,5.0,3.0) nseg 12 #Z&/w.D2
eP{srP3 9
R @e'=z[%1
sel pile prop emod 1.0e1 nu 0.3 xcarea 0.7854 xcj 9.82e-2 xciy 4.91e-2 xciz 4.91e-2 & AGBV7Kk
per 3.14 cs_sk 1.0e1 cs_scoh 1.0e1 cs_sfric 0.0 cs_nk 1.0e1 cs_ncoh 1.0e1 cs_nfric 0.0 aSR-.r
BK$y>=
`
1S{Biqi+
def place_piles [4)Oi-_Y>
loop n(1,10) 4u{S?Ryy
x_d=20.0+10*cos(12*pi/180) W4^L_p>Tm^
y_d=1.1*(n-1) SV7;B?e%Y
z_1=14.5-10*sin(12*pi/180) ( ?FH`<
z_2=13.5-10*sin(12*pi/180) m/HT3<F
z_3=12.5-10*sin(12*pi/180) Qg> NJ\*Q
z_4=11.5-10*sin(12*pi/180) ! _I1=yi
z_5=10.5-10*sin(12*pi/180) )^(*B6;z5
p_1=5*n-4 K<JzIuf&
p_2=5*n-3 7ZcF0h
p_3=5*n-2 ycA<l"
p_4=5*n-1 WQ|:TLQ
p_5=5*n J^!;$H kd
command $8EEtr,!
sel cable id=@p_1 begin=(20.0,@y_d,14.5) end=(@x_d,@y_d,@z_1) nseg=9 6[bopin
sel cable id=@p_2 begin=(20.0,@y_d,13.5) end=(@x_d,@y_d,@z_2) nseg=9 G gO5=|
sel cable id=@p_3 begin=(20.0,@y_d,12.5) end=(@x_d,@y_d,@z_3) nseg=9 JK,M K|
sel cable id=@p_4 begin=(20.0,@y_d,11.5) end=(@x_d,@y_d,@z_4) nseg=9
)p& g!qA
sel cable id=@p_5 begin=(20.0,@y_d,10.5) end=(@x_d,@y_d,@z_5) nseg=9 > .:+|Br`
sel cable prop emod 2.0e11 gr_coh 4.5e4 gr_fric 25 gr_k 4.2e7 xcarea 7.87e-3 ytens 3.0e8 "ra$x2 |=}
end_command 2& Q\W
end_loop o3WOp80hz
end '' 17(%
@place_piles Im]@#X
;****************************************** 2.qPMqH
hist nstep 20 H MOIUd
hist gp zdis 20.0 5.0 15.0 U,GSWMI/K
hist gp zdis 20.5 5.0 15.0 yD[d%w
hist gp zdis 21.0 5.0 15.0 {v={q1
hist gp zdis 21.5 5.0 15.0 2+]5 }'M
hist gp zdis 22.0 5.0 15.0 1"
'3/MFQ8
hist gp zdis 22.5 5.0 15.0 kG^76dAQL
hist gp zdis 23.0 5.0 15.0 ':4cQ4Z
hist gp zdis 23.5 5.0 15.0 7>hcvML
hist gp zdis 24.0 5.0 15.0 u nDW2#GX
hist gp zdis 24.5 5.0 15.0 5eAZfe%H
hist gp zdis 25.0 5.0 15.0 aq,1'~8 XR
hist gp zdis 25.5 5.0 15.0 s 6Wp"V(
hist gp zdis 26.0 5.0 15.0 vHaM yA-
hist gp zdis 26.5 5.0 15.0 ,BdObx
hist gp zdis 27.0 5.0 15.0 jkeerU6
hist gp zdis 27.5 5.0 15.0 zLJ>)v$81
hist gp zdis 28.0 5.0 15.0 `kKss U<
hist gp zdis 28.5 5.0 15.0 q<Rj Ai
hist gp zdis 29.0 5.0 15.0 <,vIN,Kl8/
hist gp zdis 39.5 5.0 15.0 MGdzrcF
hist gp zdis 30.0 5.0 15.0 c~|(j \FI
hist gp zdis 31.0 5.0 15.0 A|biOz
hist gp zdis 32.0 5.0 15.0 /<[0o]
hist gp zdis 33.0 5.0 15.0 ?G{0{ c2
hist gp zdis 34.0 5.0 15.0 >t+ ENYb
hist gp zdis 35.0 5.0 15.0 !$)reaS
hist gp zdis 36.0 5.0 15.0 |3$E w.
hist gp zdis 37.0 5.0 15.0 y4\X~5kU
hist gp zdis 38.0 5.0 15.0 0d2P
hist gp zdis 39.0 5.0 15.0 ~ !uX"F8Xl
hist gp zdis 40.0 5.0 15.0 kD#T _d
hist gp zdis 42.0 5.0 15.0 =<\22d5L
hist gp zdis 44.0 5.0 15.0 1 UQ,V`y
hist gp zdis 46.0 5.0 15.0 ?;~!C2Zs
hist gp zdis 48.0 5.0 15.0 UiU/p
hist gp zdis 50.0 5.0 15.0 y_P A9#v7
hist gp zdis 52.0 5.0 15.0 #.8v[TkKq
hist gp zdis 54.0 5.0 15.0 *F$@!ByV
hist gp zdis 56.0 5.0 15.0 ,fj Y|ip
hist gp zdis 58.0 5.0 15.0 \zd[A~!
hist gp zdis 60.0 5.0 15.0 u%-]-:c
;************************************************** ^^ q&VL
hist gp xdis 20.0 5.0 15.0 |n_N.Z
hist gp xdis 20.0 5.0 14.5 =DwLNyjU4
hist gp xdis 20.0 5.0 14.0 a)|y0w)vV
hist gp xdis 20.0 5.0 13.5 E}wT5t;u
hist gp xdis 20.0 5.0 13.0 {7y;s
hist gp xdis 20.0 5.0 12.5 lpi"@3
hist gp xdis 20.0 5.0 12.0 .Ys
e/oEo
hist gp xdis 20.0 5.0 11.5 2EgvS!"
hist gp xdis 20.0 5.0 11.0 -TD\?Q
hist gp xdis 20.0 5.0 10.5 hcVu`B n
hist gp xdis 20.0 5.0 10.0 FNGa4
hist gp xdis 20.0 5.0 9.5 @$slGY
hist gp xdis 20.0 5.0 9.0 ]9!y3"..W{
hist gp xdis 20.0 5.0 8.5 ^f[6NYS?
hist gp xdis 20.0 5.0 8.0 b'wy{~l@
hist gp xdis 20.0 5.0 7.5 }6Pbjm *
hist gp xdis 20.0 5.0 7.0 %/dOV[/
hist gp xdis 20.0 5.0 6.5 Whd >
hist gp xdis 20.0 5.0 6.0 sY<UJlDKT
hist gp xdis 20.0 5.0 5.5 ~[=<O s
hist gp xdis 20.0 5.0 5.0 D5gj*/"
hist gp xdis 20.0 5.0 4.5 Z+B*V )a=
hist gp xdis 20.0 5.0 4.0 9hr7+fW]t
hist gp xdis 20.0 5.0 3.5 NuOA'e+i
hist gp xdis 20.0 5.0 3.0 Dgz, Uad8f
;*************************************** st iF`l
hist gp zdis 0.0 5.0 10.0 08\w!!a:
hist gp zdis 1.0 5.0 10.0 Q{~g<G
hist gp zdis 2.0 5.0 10.0 @x `X| >&
hist gp zdis 3.0 5.0 10.0 V 7,dx@J-
hist gp zdis 4.0 5.0 10.0 e5mu-
hist gp zdis 5.0 5.0 10.0 \Zf=A[
hist gp zdis 6.0 5.0 10.0 Y:CX RU6eD
hist gp zdis 7.0 5.0 10.0 7 U7!'xU
hist gp zdis 8.0 5.0 10.0 ;R= n<=Axa
hist gp zdis 9.0 5.0 10.0 R_!'=0}V
hist gp zdis 10.0 5.0 10.0 'VV U-)(8
hist gp zdis 11.0 5.0 10.0 6B]=\H
hist gp zdis 12.0 5.0 10.0 |!FQQ(1b
hist gp zdis 13.0 5.0 10.0 ?I]AE&4'
hist gp zdis 14.0 5.0 10.0 iM!Ya!
hist gp zdis 15.0 5.0 10.0 HMVP71
hist gp zdis 16.0 5.0 10.0 *iB&tW v
hist gp zdis 17.0 5.0 10.0 `BmnXWMgx
hist gp zdis 18.0 5.0 10.0 B}[CU='P*
hist gp zdis 19.0 5.0 10.0 <M9NyD `
hist gp zdis 20.0 5.0 10.0 2hV -h
;*********************************** )4rt -_t<
hist sel pilesel force fx (20.3,5.0,15.0) K yx9_2
hist sel pilesel force fx (20.3,5.0,14.0) ZH~ bY2^;
hist sel pilesel force fx (20.3,5.0,13.0) !<TkX/O
hist sel pilesel force fx (20.3,5.0,12.0) MK3h~` is
hist sel pilesel force fx (20.3,5.0,11.0) { <Gyjq
hist sel pilesel force fx (20.3,5.0,10.0) pZ8J\4+
hist sel pilesel force fx (20.3,5.0,9.0) -sJ1q^;f@
hist sel pilesel force fx (20.3,5.0,8.0) #^$_/Q#C
hist sel pilesel force fx (20.3,5.0,7.0) ZtZ3I?%U3
hist sel pilesel force fx (20.3,5.0,6.0) _Q:z -si
hist sel pilesel force fx (20.3,5.0,5.0) :G>w MMv&z
hist sel pilesel force fx (20.3,5.0,4.0) <M\&zHv
hist sel pilesel force fx (20.3,5.0,3.0) af<h2 r
hist sel pilesel moment mx (20.3,5.0,15.0) *zUK3&n~I
hist sel pilesel moment mx (20.3,5.0,14.0) fTXip)n !r
hist sel pilesel moment mx (20.3,5.0,13.0) Muwlehu q
hist sel pilesel moment mx (20.3,5.0,12.0) JDf> Qg{
hist sel pilesel moment mx (20.3,5.0,11.0) % PzkV s
hist sel pilesel moment mx (20.3,5.0,10.0) ~!ooIwNN z
hist sel pilesel moment mx (20.3,5.0,9.0) Q u2
~wp<
hist sel pilesel moment mx (20.3,5.0,8.0) XaCvBQ
hist sel pilesel moment mx (20.3,5.0,7.0) r 10VFaly
hist sel pilesel moment mx (20.3,5.0,6.0) j-d&4,a:c
hist sel pilesel moment mx (20.3,5.0,5.0) (F^R9G|
hist sel pilesel moment mx (20.3,5.0,4.0) dC,C[7\
hist sel pilesel moment mx (20.3,5.0,3.0) } E ]l4N2
model null range x 0.0 20.0 z 15.0 13.0 PVg<Ovi^d
step 200 X$KT sG*
model null range x 0.0 20.0 z 13.0 12.0 o/3.U=px~
step 200 \ Bj{.jL
model null range x 0.0 20.0 z 12.0 11.0 =4` wYh
step 200 Mf14> `<`
model null range x 0.0 20.0 z 11.0 10.0 GXxI=,L8F
Xfg3q.q
D\G .p |9=
step 15000 e".=E ;o`
hist write -2 -3 -4 -5 -6 -7 -8 -9 -10 -11 -12 -13 -14 -15 -16 -17 -18 -19 -20 -21 -22 -23 & I?Iz5e-
-24 -25 -26 -27 -28 -29 -30 -31 -32 -33 -34 -35 -36 -37 -38 -39 -40 -41 vs 1 file dingbushuxiangweiyi.dat | Uics:cQC
hist write -42 -43 -44 -45 -46 -47 -48 -49 -50 -51 -52 -53 -54 -55 -56 -57 -58 -59 -60 -61 & d<d3j9u(#
-62 -63 -64 -65 -66 vs 1 file qiangticexiangweiyi.dat lrZ]c:%k
hist write -67 -68 -69 -70 -71 -72 -73 -74 -75 -76 -77 -78 -79 -80 -81 -82 -83 -84 -85 -86 & G_?U?:!AC
-87 vs 1 file kengdilongqiweiyi.dat 0GxJja
hist write -88 -89 -90 -91 -92 -93 -94 -95 -96 -97 -98 -99 -100 -101 -102 -103 -104 -105 & * EGzFXa
-106 -107 -108 -109 -110 -111 -112 -113 vs 1 file zhuangtibianxing.dat ~*bfS}F8I
|! ]
"y<
#f"eZAQ {
save result.sav
