求助边坡加锚 [复制链接]

***********建立边坡模型，并进行网格化分************ H,XLb.  
;**********第1块*********************** E4v_2Q -w  
gen zone wedge p0(325.371509775074,0,376.635571694099) p1 ic0v*Y$  
(237.509927879625,0,270.925904145511) p2  kulQR>u  
(325.371509775074,10,376.635571694099) p3 Y:"v=EhB  
(325.363927118656,0,298.609017598765) p4 tC@zM.v%  
(237.509927879625,10,270.925904145511) p5
\abAPo  
(325.363927118656,10,298.609017598765 size 5 1 5 ADv"_bB:h  
;**********第2块*********************** W]yClx \  
gen zone brick p0(325.363927118656,0,298.609017598765) p1 6`4W,  
(393.318698206292,0,321.843169023481) p2 KIAe36.~  
(325.363927118656,10,298.609017598765) p3 x#j\"$dla  
(325.371509775074,0,376.635571694099) p4 '=Kof1  
(393.318698206292,10,321.843169023481) p5 A{8K#@!  
(325.371509775074,10,376.635571694099) p6 Vk
TlPmr  
(393.326805700341,0,415.229734921956) p7 ,JQxs7@2k  
(393.326805700341,10,415.229734921956) size 5 1 5 VM]GYz|#]  
;**********第3块*********************** APtselC  
gen zone brick p0(393.318698206292,0,321.843169023481) p1 h\u0{!@}  
(475.498640213354,0,354.365597897843) p2 Q+!
0)pG5#  
(393.318698206292,10,321.843169023481) p3 |1QbO`f/F  
(393.326805700341,0,415.229734921956) p4 Id.Z[owC`Y  
(475.498640213354,10,354.365597897843) p5 ;&W;  
(393.326805700341,10,415.229734921956) p6 fr'huvc  
(475.50683818756,0,438.723854768785) p7 ]Ic?:lKN  
(475.50683818756,10,438.723854768785) size 5 1 5 }$0xt'q&  
;**********第4块*********************** wSJ]3gJM`  
gen zone brick p0(475.498640213354,0,354.365597897843) p1 x'@32gv  
(538.970620034247,0,384.218214400487) p2 d(DX(xg  
(475.498640213354,10,354.365597897843) p3 NHFEr
 
(475.50683818756,0,438.723854768785) p4 ~[uV  
(538.970620034247,10,384.218214400487) p5 zOiY0`=  
(475.50683818756,10,438.723854768785) p6 JwI`"$>w  
(538.978541658805,0,475.463833495854) p7 1t\b a1x  
(538.978541658805,10,475.463833495854) size 5 1 5 H7yg9zFT N  
;**********第5块*********************** 7dlKdKH  
gen zone brick p0(538.970620034247,0,384.218214400487) p1 C'8!cPFVv  
(633.394334999949,0,434.810340192916) p2 GIRSoRVsh  
(538.970620034247,10,384.218214400487) p3 =##s;zj(%  
(538.978541658805,0,475.463833495854) p4 "'F;lzq  
(633.394334999949,10,434.810340192916) p5 <nb3~z1  
(538.978541658805,10,475.463833495854) p6 }ED nLou  
(633.4060080761,0,554.92786334483) p7 jr[<i\!  
(633.4060080761,10,554.92786334483) size 5 1 5 M)`HK .  
;**********第6块*********************** e:$
7^Y,U/  
gen zone brick p0(633.394334999949,0,434.810340192916) p1 o/dMm:TF  
(702.197699772515,0,474.027380981266) p2 pVV}1RDa  
(633.394334999949,10,434.810340192916) p3 I NPYJ#%  
(633.4060080761,0,554.92786334483) p4 5U)ab3:  
(702.197699772515,10,474.027380981266) p5 (!0j4'  
(633.4060080761,10,554.92786334483) p6 &'huS?gA9  
(702.208936770931,0,603.461295685074) p7 U50s!Zt45  
(702.208936770931,10,603.461295685074) size 5 1 5 iBKb/Oi6  
;**********第7块*********************** 4#@W;'  
gen zone brick p0(702.197699772515,0,474.027380981266) p1 ib(>vp$V  
(764.976557373504,0,510.487720438224) p2 joChML_  
(702.197699772515,10,474.027380981266) p3 XJ:>UNf5;  
(702.208936770931,0,603.461295685074) p4 {HIR>])o  
(764.976557373504,10,510.487720438224) p5 0HHui7Yy>  
(702.208936770931,10,603.461295685074) p6 .B 85!lCF  
(764.989858326288,0,663.695394258972) p7 a)_rka1(  
(764.989858326288,10,663.695394258972) size 5 1 5 l- 1]w$ y  
;**********第8块*********************** zmB31' _  
gen zone brick p0(764.976557373504,0,510.487720438224) p1 w*<Y$hnBzF  
(802.260882016456,0,533.452982234561) p2 ,W1a
<dl  
(764.976557373504,10,510.487720438224) p3 o9
m
  
(764.989858326288,0,663.695394258972) p4 bSrRsgKvT  
(802.260882016456,10,533.452982234561) p5 u(1J=h  
(764.989858326288,10,663.695394258972) p6 2<[eD`u  
(802.27850543261,0,714.800304082947) p7 yV J dZI  
(802.27850543261,10,714.800304082947) size 5 1 5 ^nHB1"OCV  
;**********第9块*********************** c?!YFm  
gen zone brick p0(802.260882016456,0,533.452982234561) p1 ${eY9-r_%  
(867.934972023531,0,579.397279648651) p2 q:Y6fbt<7  
(802.260882016456,10,533.452982234561) p3 6Iv(  
(802.27850543261,0,714.800304082947) p4 4-7kS85  
(867.934972023531,10,579.397279648651) p5 d)04;[=  
(802.27850543261,10,714.800304082947) p6 e}'#Xv
 
(867.950570236155,0,759.066053053997) p7 <$i"zb
 
(867.950570236155,10,759.066053053997) size 5 1 5 T|o`a+?  
;**********第10块*********************** VG<Hw{ c3r  
gen zone brick p0(867.934972023531,0,579.397279648651) p1 @,x_i8  
(938.839302411703,0,641.808924386638) p2 gf68iR.Gs  
(867.934972023531,10,579.397279648651) p3 HDF!`  
(867.950570236155,0,759.066053053997) p4 p{ @CoOn  
(938.839302411703,10,641.808924386638) p5 )YzHk ;(  
(867.950570236155,10,759.066053053997) p6 fJ)N:q`  
(938.85393110367,0,810.310226793018) p7 o~v_PD[S  
(938.85393110367,10,810.310226793018) size 5 1 5 kgbobolA  
;**********第11块*********************** Q;$ 9qOF  
gen zone brick p0(938.839302411703,0,641.808924386638) p1 & Fg|%,fv]  
(1006.05516602482,0,712.294023994194) p2 >H0) ph  
(938.839302411703,10,641.808924386638) p3 ^w:OS5%R  
(938.85393110367,0,810.310226793018) p4 . ]o3A8  
(1006.05516602482,10,712.294023994194) p5 <`R|a *  
(938.85393110367,10,810.310226793018) p6 yaH Trh%  
(1006.06859579434,0,866.985479665564) p7 >aEL;V=}P  
(1006.06859579434,10,866.985479665564) size 5 1 5 |'V DI]p&  
;**********第12块*********************** 5l41Q  
gen zone brick p0(1006.05516602482,0,712.294023994194) p1 On{~St'V
 
(1081.21471243618,0,798.618156480781) p2 3[0w+{(Q  
(1006.05516602482,10,712.294023994194) p3 4GG1E. z}  
(1006.06859579434,0,866.985479665564) p4
-A/ds1=;  
(1081.21471243618,10,798.618156480781) p5 r-RCe3%g%  
(1006.06859579434,10,866.985479665564) p6 gEZwW]r-  
(1081.22524240954,0,906.972998236051) p7 Ni2]6U  
(1081.22524240954,10,906.972998236051) size 5 1 5 hD nM+4D  
;**********第13块*********************** O^.%C`*  
gen zone wedge p0(1223.59495360001,0,974.235305806856) p1 M"=8O>NZ2  
(1081.22524240954,0,906.972998236051) p2 CY*ngi&  
(1223.59495360001,10,974.235305806856) p3 UGhW0X3k  
(1081.21471243618,0,798.618156480781) p4 }Vvsh3  
(1081.22524240954,10,906.972998236051) p5 t6'61*)|0  
(1081.21471243618,10,798.618156480781 size 5 1 5 X}oj_zsy;^  
group 1 e#>tM  
;**********第14块*********************** ],;D2]<s  
gen zone brick p0(0,0,0) p1(237.483596932835,0,-2.30787651873532E-02) 5/& 1Oxo  
p2(0,10,0) p3(0,0,277.520524977887) p4(237.483596932835,10,- SU?wFCGT%  
2.30787651873532E-02) p5(0,10,277.520524977887) p6 gw_|C|!P  
(237.509927879625,0,270.925904145511) p7 5cD XWF  
(237.509927879625,10,270.925904145511) size 5 1 5 s1X]RXX&j  
;**********第15块*********************** #*!
+b  
gen zone brick p0(237.483597172023,0,-2.06174928067938E-02) p1 t*{,Gk  
(325.334905084496,0,-.031616195723271) p2(237.483597172023,10,- 1&"-*)  
2.06174928067938E-02) p3(237.509927879625,0,270.925904145511) p4 |h5kg<Zgo  
(325.334905084496,10,-.031616195723271) p5 IFiTTIlT0  
(237.509927879625,10,270.925904145511) p6 rkxW UDl   
(325.363927118656,0,298.609017598765) p7 0o=!j3RjH  
(325.363927118656,10,298.609017598765) size 5 1 5 `1n
RcY  
;**********第16块*********************** [RAj3Fr0  
gen zone brick p0(325.334905412165,0,-2.82444352031419E-02) p1 P3'2IzNw  
(393.29075394712,0,-3.41441235817683E-02) p2(325.334905412165,10,- i]it5  
2.82444352031419E-02) p3(325.363927118657,0,298.609017598765) p4 F\>oxttS1
 
(393.29075394712,10,-3.41441235817683E-02) p5 U?bG`. X  
(325.363927118657,10,298.609017598765) p6 ^C!mCTL1N  
(393.318698206292,0,321.843169023481) p7 Q`H# fS~  
(393.318698206292,10,321.843169023481) size 5 1 5 B|cA[  
;**********第17块*********************** ^9&b+u=X  
gen zone brick p0(393.29075394712,0,-3.41441235817634E-02) p1 ZhH+D`9  
(475.464198790122,0,-4.12781337960892E-02) p2(393.29075394712,10,- hVMYB_<~  
3.41441235817634E-02) p3(393.318698206292,0,321.843169023481) p4 -#hK|1]  
(475.464198790122,10,-4.12781337960892E-02) p5 TE3*ktB{N
 
(393.318698206292,10,321.843169023481) p6 }qer  
(475.498640213354,0,354.365597897843) p7 {IJ-4>  
(475.498640213354,10,354.365597897843) size 5 1 5 ;aq`N}d  
;**********第18块*********************** 7t'(`A6t/  
gen zone brick p0(475.464198790122,0,-4.12781337960892E-02) p1 g[/^cJHQ  
(538.937259494696,0,-.046788642261033) p2(475.464198790122,10,- CV'&4oq  
4.12781337960892E-02) p3(475.498640213355,0,354.365597897843) p4 B,3 t`  
(538.937259494696,10,-.046788642261033) p5 >&bv\R/  
(475.498640213355,10,354.365597897843) p6 )T>8XCL\}  
(538.970620034247,0,384.218214400487) p7 31WZJm^  
(538.970620034247,10,384.218214400487) size 5 1 5 Tdg6kkJ  
;**********第19块*********************** b.QpHrnhtK  
gen zone brick p0(538.937259494696,0,-.046788642261033) p1 cp$.,V  
(633.352073949682,0,-6.15494458749579E-02) p2(538.937259494696,10, S[vRw]*  
-.046788642261033) p3(538.970620034247,0,384.218214400487) p4 EPc!p>  
(633.352073949682,10,-6.15494458749579E-02) p5 IuNkfBe4m  
(538.970620034247,10,384.218214400487) p6 e#tIk;9Xz  
(633.394334999947,0,434.810340192915) p7 HtxLMzgz<<  
(633.394334999947,10,434.810340192915) size 5 1 5 #nKRTb+{  
;**********第20块*********************** /:U1!9.y  
gen zone brick p0(633.352074587578,0,-5.49854052973544E-02) p1 }04Dg'  
(702.156541085974,0,-6.09587677106447E-02) p2(633.352074587578,10,- Z;hyi'rPJ  
5.49854052973544E-02) p3(633.394334999949,0,434.810340192916) p4 8KFj<N>'  
(702.156541085974,10,-6.09587677106447E-02) p5 {
={^6@  
(633.394334999949,10,434.810340192916) p6 P3G:th@j=  
(702.197699772506,0,474.027380981261) p7 [M4xZHd#o  
(702.197699772506,10,474.027380981261) size 5 1 5 aC`Li^  
;**********第21块*********************** g;8M<`qvf  
gen zone brick p0(702.156541085974,0,-6.09587677105841E-02) p1 ~%`EeJwT  
(764.932232855049,0,-6.64087330509346E-02) p2(702.156541085974,10,- l$F_"o?&S@  
6.09587677105841E-02) p3(702.197699772515,0,474.027380981266) p4 :3v9h^|+  
(764.932232855049,10,-6.64087330509346E-02) p5 Zb]/nP1P  
(702.197699772515,10,474.027380981266) p6 DB#$~(o  
(764.976557373504,0,510.487720438224) p7 Y+FP  
(764.976557373504,10,510.487720438224) size 5 1 5 QV0M/k<'  
;**********第22块*********************** GE@uOJ6H  
gen zone brick p0(764.932232855049,0,-6.64087330509346E-02) p1 ;v_ls)_,-  
(802.209034042135,0,-6.96449741618499E-02) p2(764.932232855049,10,- u=%y  
6.64087330509346E-02) p3(764.976557373516,0,510.487720438231) p4 5? Wg%@  
(802.209034042135,10,-6.96449741618499E-02) p5 ]3}feU+  
(764.976557373516,10,510.487720438231) p6 _ j~4+H  
(802.260882016456,0,533.452982234561) p7 J==}QEhQ{  
(802.260882016456,10,533.452982234561) size 5 1 5 @d&g/ccMxd  
;**********第23块*********************** 3c b[RQf  
gen zone brick p0(802.209034042135,0,-6.96449741618499E-02) p1  ozU2  
(867.884664242919,0,-7.53467019837899E-02) p2(802.209034042135,10,- 8/Mx5~ R  
6.96449741618499E-02) p3(802.260882016456,0,533.452982234561) p4 m$?.Yig?  
(867.884664242919,10,-7.53467019837899E-02) p5 m=H_?W;  
(802.260882016456,10,533.452982234561) p6 {(;B5rs  
(867.934972023531,0,579.397279648651) p7 ;d4y{  
(867.934972023531,10,579.397279648651) size 5 1 5 `qE4U4  
;**********第24块*********************** qYiv   
gen zone brick p0(867.884664242919,0,-7.53467019837739E-02) p1 D3y>iQd
  
(938.783575736664,0,-8.15018967641663E-02) p2(867.884664242919,10,- T8U[xu.>  
7.53467019837739E-02) p3(867.934972023531,0,579.397279648651) p4 3)Zu[c[%'J  
(938.783575736664,10,-8.15018967641663E-02) p5 %VWp&a8  
(867.934972023531,10,579.397279648651) p6 K5{{:NR$  
(938.839302411703,0,641.808924386638) p7 GA\2i0ow  
(938.839302411703,10,641.808924386638) size 5 1 5 /u=aX  
;**********第25块*********************** \*uugw,\y  
gen zone brick p0(938.783575736664,0,-8.15018967641232E-02) p1 0pD[7~^o  
(1005.99331957413,0,-8.73368109502664E-02) p2(938.783575736664,10,- [<yz)<<  
8.15018967641232E-02) p3(938.839302411703,0,641.808924386638) p4 v;Es^ YI  
(1005.99331957413,10,-8.73368109502664E-02) p5 Wm(:P  
(938.839302411703,10,641.808924386638) p6 2 l(Dee Y  
(1006.05516602482,0,712.294023994194) p7 n'yl)HA~>`  
(1006.05516602482,10,712.294023994194) size 5 1 5 8)pB_en3sO  
;**********第26块*********************** ?;^5ghY$  
gen zone brick p0(1005.99331957413,0,-8.73368109502664E-02) p1 8'KMxR  
(1081.13709323497,0,-9.38605297728576E-02) p2(1005.99331957413,10,- k d+l k:  
8.73368109502664E-02) p3(1006.05516602482,0,712.294023994194) p4 Ah (iE  
(1081.13709323497,10,-9.38605297728576E-02) p5 zj{(p Z1  
(1006.05516602482,10,712.294023994194) p6 gGI8t@t:  
(1081.21471243616,0,798.618156480762) p7 
FuuS"G,S  
(1081.21471243616,10,798.618156480762) size 5 1 5 p5-<P?B  
;**********第27块***********************  DwXU  
gen zone brick p0(1081.13709323497,0,-9.38605297728576E-02) p1 \#++s&06  
(1223.50026541007,0,-.118900318576736) p2(1081.13709323497,10,- 3w6&&R9  
9.38605297728576E-02) p3(1081.21471243618,0,798.618156480781) p4 (xL :;  
(1223.50026541007,10,-.118900318576736) p5 ailG./I+  
(1081.21471243618,10,798.618156480781) p6 KSc~GP_  
(1223.5949536,0,974.235305806856) p7(1223.5949536,10,974.235305806856) S6GMUaR  
size 5 1 5 Wab.|\c  
;**********第28块*********************** 80}4/8  
gen zone brick p0(1223.50026664235,0,-.106220001073744) p1 ;,rnk
-  
(1369.5591226882,0,-.118900318576736) p2(1223.50026664235,10, N!L'W\H,  
-.106220001073744) p3(1223.59495360001,0,974.235305806858) p4 @V$I?iXV  
(1369.5591226882,10,-.118900318576736) p5 <7^Kt7k  
(1223.59495360001,10,974.235305806858) p6 I
r27ZP  
(1369.5591226882,0,1127.69137015435) p7 )pS8{c)E  
(1369.5591226882,10,1127.69137015435) size 5 1 5 Aq"PG}Ic  
group 2 range group 1 not 3za`>bUN  
***********定义岩土参数********** E67XPvo1+@  
model elas range group 2 E5gl^Q?Z  
model mohr range group 2 not %K?iNe  
property bulk 20e9 shear 10e9 density 2400 range group 2 q!&B6]  
property bulk 2e9 shear 1e9 cohesion 12e3 friction 21 density 2000 t!{x<9  
range group 2 not b/nOdFO@  
*************施加锚索************* 4[1k\  
sel cable id=1 begin(325.3175,0.5,376.6356) end(516.1374,0.5,287.6800) lUHtjr  
nseg=10 333u
]  
sel cable id=2 begin(460.8365,0.5,434.5298) end(662.0450,0.5,340.7048) yp p4L|R  
nseg=10 UfKkgq#  
sel cable id=3 begin(572.3805,0.5,503.5765) end(771.5718,0.5,410.6942) b66R}=P l  
nseg=10 |'<vrn  
sel cable id=4 begin(668.6169,0.5,579.7655) end(874.9548,0.5,483.5486) < eQ[kM  
nseg=10 -L8YJ8J6  
sel cable id=5 begin(759.5143,0.5,658.4420) end(958.6288,0.5,565.5934) ~M*gsW$  
nseg=10 1"O&40l  
sel cable id=6 begin(841.5323,0.5,741.2590) end x%6hM|U  
(1058.6469,0.5,640.0168) nseg=10 *Tp]h 0  
sel cable id=7 begin(943.9166,0.5,814.5790) end =/Wu'gG)  
(1159.8808,0.5,713.8732) nseg=10 P>wZ~Hjk  
sel cable id=8 begin(1037.8491,0.5,883.8945) end(1242.9164,0.5,788.27) ({e7U17[#  
nseg=10 ,eXFN?CB  
*************定义锚索参数************* W`x)=y]Z  
sel cable property xcarea 9e-3 emod 2e11 ytension 1295e3 ycompression skR,-:"8  
-15e4 & JpK[&/Ct  
gr_k= 3e9 gr_per=1.13e-2 gr_coh=600e3 gr_fric=0 slide off e!Br>^8l  
sel cable pretension=600e3 %K zbO0  
*************约束模型加自重*************** x> \Bxa8  
plot add axes red &Mj1CvCv  
fix y ;& ~929  
fix z range z 0 X2^_~<I{,  
fix x range x 0 any x 1369.5591 any N@()F&e
  
set gravity 0 0 -9.8 $)*xC!@6X  
history unbal TEWAZVE*  
plot hist 1 y9!:^kDI  
***********求解************** ;Iq5|rzDn  
solve 6m+W#]^  
9|=nV|R'6  
_2OuskL  
W2<3C  
  上面是我编的命令流，可是计算结果反映加锚后边坡的塑性区和加锚前是一样的，位移变化也没有任何区别，锚索没有起到应有的作用，不知为何，烦请各位高手帮小弟一把呀，谢谢！ ! =WcF5  

自己顶下！