各位大虾,小弟我现在正在学习FLAC中的FISH语言,遇到了一个问题,就是要模拟一个盾构隧道的开挖,隧道长10m,每两米一挖,下面这个程序是我自己写的,运行了好几次就是达不到想要的结果,求指点............
gen zone radcyl p0 0 0 0 p1 5 0 0 p2 0 10 0 p3 0 0 5 dim 3 3 3 size 3 10 8 4 group 隧道周围 fill group 左隧道
gen zone radcyl p0 0 0 0 p1 0 0 5 p2 0 10 0 p3 -5 0 0 dim 3 3 3 size 3 10 8 4 group 隧道周围 fill group 左隧道
gen zone radcyl p0 0 0 0 p1 -5 0 0 p2 0 10 0 p3 0 0 -5 dim 3 3 3 size 3 10 8 4 group 隧道周围 fill group 左隧道
gen zone radcyl p0 0 0 0 p1 0 0 -5 p2 0 10 0 p3 5 0 0 dim 3 3 3 size 3 10 8 4 group 隧道周围 fill group 左隧道
plot block group
;开挖
def y_disp
loop n (1,5)
sum=2*(n-1)
zum=2*n
endloop
end
y_disp
model null range y sum zum group 左隧道