3DEC-经典算例，书上内容
仔细学习，融会贯通
P47 ----------------------------------------------
哈密瓜的切法poly brick 0,80 -30,80 0,50素描大全
plot block
jt dip 90 dd 180 origin 0,0,0
jt dip 90 dd 180 origin 0,50,0
hide range y -30,0
hide range y 50,80
mark region 1
jt dip 2.5 dd 235 or 30,0,12.5
jt dip 2.5 dd 315 or 35,0,30
jt dip 76 dd 270 spacing 4 number 5 or 38,0,12.5
hide range x 30,80 y 0,50 z 0,50
jt dip 0 dd 0 or 0,0,10
hide range z 0,10
mark region 2
ek
hide range region 0
hide range z 0,10
hide range x 55,80
宝贝科hide range x 0,30
jt dip 70 dd 200 or 0,35,0
jt dip 60 dd 330 or 50,15,50
ek
hide region 0 2
plot t dip 70 dd 210 mag 2
plot axes block colorby material
ek
fix range z 0 10
fix range x 55 80
fix region 0
hide region 0
delete region 2
gravity 0 0 -10
ek
prop mat=1 dens=2000
prop jmat=1 kn=1e9 ks=1e9 f=89
prop jmat=2 kn=1e9 ks=1e9 f=0.0
change dip 90 dd 180 jmat=2
hist zvel (30,30,30) type 1
step 500
有一天晚上
plot hist 1
title
new title>rock slope stability
plot hardcopy
save slope.sav
prop jmat=1 f=6.0
cycle 2000
hide reg 0
title
new title> ROCK SLOPE STABILITY -- WEDGE FAILURE
plot dip 70 dd 210 mag 2
plot clear
plot t orien (90,180,0) center (38,25,35) mag 1.5
plot cut add plane origin (0,25,0) name plane normal (0,1,0)
plot add displacement colorby on plane onplane on front off behind off
plot add block fill off plane onp on front off behind off
rest slope.sav
P57 ----------------------------------------------
new
poly brick 0,10 0,10 0,10
pl bl
pl ret
jt origin 5 5 5
prop jmat 1 jkn 1.33e7 jks 1.33e7 fric 20.0
prop mat 1 dens 2000
plot block colorby mat
plot t dip 70 dd 210
cycle 1
list block
list contact
list contact location
gen edge 20
list zone location
P64 ----------------------------------------------
new
poly brick -1 1 -1 1 -1 1
plot block colorby mat
pl ret
plot t dip 70 dd 200
jt dip 65 dd 270 origin .3 0 0
jt dip 40 dd 230 origin 0 -.3 0
jt dip 50 dd 320 origin 0 .3 0
ret
tunnel a (-.3 -1.5 -.3) (-.3 -1.5 .3) (.3 -1.5 .3) (.3 -1.5 -.3) &
b (-.3 1.5 -.3) (-.3 1.5 .3) (.3 1.5 .3) (.3 1.5 -.3)
remove range x -.3 .3 y -1.5 1.5 z -.3 .3
plot excavate joint
ret
gen edge 1.0
prop mat=1 dens 2000 bulk 1.5e9 g .6e9
prop jmat=1 jkn 1e9 jks 1e9 coh 1e9 ten 1e9
ret
bound stress 0.0 0.0 -1.0e6 0.0 0.0 0.0 range z 0.9 1.1
bound xvel 0.0 range x -1.1 -0.9
bound xvel 0.0 range x 0.9 1.1
bound yvel 0.0 range y -1.1 -0.9
bound yvel 0.0 range y 0.9 1.1
老年护理bound zvel 0.0 range z -1.1 -0.9
gravity 0,0,-10.0
insitu stress -0.5e6 -0.5e6 -1.0e6 0.0 0.0 0.0
ret
hist unbal
hist zdis .3 0 .3
hist ty 1
pl hist 1
step 500
save tun0.sav
ret
rest tun0.sav
prop jmat 1 fric 6.0 coh 0.0 ten 0.0
ret time hist disp
hist unbal
hist zdisp .3 -0.1 .3
hist ty 2
hide range x -0.4 0.5 y -1 -.5 z .3 .8
plot block disp line color cyan
cycle 5000
save tun1.sav
ret
rest tun0.sav
prop jmat 1 fric 6.0 coh 0.0 ten 0.0
struct cable .3 0 .3 .7 0 .7 prop 1 g 4
struct prop 1 area 5e-4 e 1e9 yield 1e6 kbond 15e8 sbond 1e9
ret time hist disp
hist unbal
hist zdisp .3 -.1 .3
hist ty 2
hide range x -.4 .5 y -1 -.5 z .3 .8
plot block disp line color cyan
plot add hist 2 xaxis label 'Step' yaxis label 'Z-Displacement'
cycle 5000
save tun2.sav
ret
P95 ----------------------------------------------
new
poly &
face 0,0,0 1,0,0 1,1,0 0,1,0 &
face 0,0,0 0,0,1 1,0,1 1,0,0 &
face 0,0,0 0,1,0 0,1,1 0,0,1 &
小尼姑年方二八face 1,1,1 1,1,0 1,0,0 1,0,1 &
face 1,1,1 1,0,1 0,0,1 0,1,1 &
face 1,1,1 0,1,1 0,1,0 1,1,0
pl bl
pl ret
pl t dip 60 dd 210
ret
P95 ----------------------------------------------
new
友情诗句经典
poly brick 0,1 0,1 0,1
pl bl
举杠铃
pl ret
pl t dip 60 dd 210
ret
P97 ----------------------------------------------
new
poly prism &
a(0,0,0)(-.5,.87,0)(-.5,1.87,0)(0,2.74,0) &
(1,2.74,0)(1.5,1.87,0)(1.5,.87,0)(1,0,0) &
b(0,0,4)(-.5,.87,4)(-.5,1.87,4)(0,2.74,4) &
(1,2.74,4)(1.5,1.87,4)(1.5,.87,4)(1,0,4)
pl bl
pl ret
pl t dip 60 dd 200
ret
P98 ----------------------------------------------
new
poly tunnel rad=2 leng=-10,10 ratr=3.0 dip=0 dd=0 nr=2 nt=1 nx=3
pl bl
pl ret
delete -2 2,-10 10 -2 2
ret
join on
P101 ----------------------------------------------
new
poly brick 0,1 0,1 0,1
pl block
pl ret
jt dip 0 dd 0 or 0,0,.5
hide dip 0 dd 0 or 0,0,.5 below
jt dip 90 dd 90 or .5,0,0
