xiaodiao666666 发表于 2009-10-27 22:26:08

第二根锚索加不上

我在一个坡度为1:0.5的岩质边坡上加了两根预应力为900KN的锚索,不知什么原因好像第二根锚索的轴力不对,好像使不上力似的,锚索方法是按得陈版主书上的方法,请大家指导一下
gen zone brick p0 10,0,4 p1 40,0,4 p2 10,20,4 p3 20,0,24 &
      p4 40,20,4 p5 20,20,24 p6 40,0,24 p7 40,20,24 size 30,20,20
gen zone brick p0 10,0,0 p1 40,0,0 p2 10,20,0 p3 10,0,4 &
p4 40,20,0 p5 10,20,4 p6 40,0,4 p7 40,20,4 size 30,20,2
gen zone brick p0 0,0,0 p1 10,0,0 p2 0,20,0 p3 0,0,4 &
    p4 10,20,0 p5 0,20,4 p6 10,0,4 p7 10,20,4 size 5,20,2
mo mo
pro bulk 9.62e9 shear 6.04e9 fri 36 coh 1.0e6 ten 1e6
ini dens 2680
fix x range x -0.1 .1
fix x range x 39.9 40.1
fix y range y -.1 .1
fix y range y 19.9 20.1
fix x y z range z -.1 .1
Set grav 0,0,-9.8
Sel cable id=1 beg 18,10,20 end 27.0283,10,15.7008 nseg 10
Sel cable id=1 beg 27.0283,10,15.7008 end 34.8,10,12 nseg 8
sel cable id 1 prop emod 1.95e8 ytension 2.32e7 xcarea 0.001641&
         gr_per 0.14363 range cid 1,10
sel cable id 1 prop emod 1.95e8 ytension 2.32e7 xcarea 0.001641 &
         gr_coh 1.75e5 gr_k 1.12e9gr_fric 30 range cid 11,18
Sel cable id=2 beg 15,10,14 end 24.0734,10,9.7961 nseg 10
Sel cable id=2 beg 24.0734,10,9.7961 end 32.26666667,10,6 nseg 8
sel cable id 1 prop emod 1.95e8 ytension 2.32e7 xcarea 0.001641&
         gr_coh 1 gr_k 1 gr_per 0.14363 range cid 19,28
sel cable id 1 prop emod 1.95e8 ytension 2.32e7 xcarea 0.001641 &
         gr_coh 1.75e5 gr_k 1.12e9gr_fric 30 range cid 29,36

sel delete link range id 1
sel link id=100 1 target zone
sel link attach xdir=rigid ydir=rigid zdir=rigid xrdir=rigid yrdir=rigid zrdir=rigid range id 100
Sel cable id=1 pretension 1e6 range cid 1,10
sel delete link range id 21
sel link id=200 20 target zone   
sel link attach xdir=rigid ydir=rigid zdir=rigid xrdir=rigid yrdir=rigid zrdir=rigid range id 200
Sel cable id=2 pretension 1e6 range cid 19,28

solve
plot set cap size 25
plo set mag 1.35
plo set background white
plot set plane norm 0 -1 0origin 0 10 0
plot con zd plane
plot add contour sxx plane behind
solve


mengqb 发表于 2009-10-28 14:44:37

施加预应力关键是弄清CID,其值的大小不是能直接写出的,应用FLSH编写程序,自动获取CID,否侧直接写出的CID是不对的,这是针对两根以上的锚杆。

gdc_1983 发表于 2009-10-28 21:31:52

第二根赋予属性的时候 id=2
页: [1]
查看完整版本: 第二根锚索加不上