隧道及地下工程FLAC3D解析方法4-6命令流 - 副本 (6)

4-6复杂形状网格生成
new
; 主隧道网格
gen zon radcyl p0 15 0 0 p1 23 0 0 p2 15 50 0 p3 15 0 8 &
size 4 10 6 4 dim 4 4 4 4 rat 1 1 1 1 fill
gen zon reflect dip 90 dd 90 orig 15 0 0
gen zon reflect dip 0 ori 0 0 0
; 辅助隧道网格
gen point id 1 (2.969848,0.0,-0.575736)
gen point id 2 (2.969848,50.0,-0.575736)
gen zon radcyl p0 0 0 -1 p1 7 0 0 p2 0 50 -1 p3 0 0 8 p4 7 50 0 &
p5 0 50 8 p6 7 0 8 p7 7 50 8 p8 point 1 p10 point 2 &
size 3 10 6 4 dim 3 3 3 3 rat 1 1 1 1
gen zon radcyl p0 0 0 -1 p1 0 0 -8 p2 0 50 -1 p3 7 0 0 p4 0 50 -8 &
p5 7 50 0 p6 7 0 -8 p7 7 50 -8 p9 point 1 p11 point 2 &
size 3 10 6 4 dim 3 3 3 3 rat 1 1 1 1
;衬砌网格
sel shell range cyl end1 0 0 -1 end2 0 50 -1 rad 3
; 隧道外围边界网格
gen zone radtun p0 7 0 0 p1 50 0 0 p2 7 50 0 p3 15 0 50 p4 50 50 0 &
p5 15 50 50 p6 50 0 50 p7 50 50 50 &
p8 23 0 0 p9 7 0 8 p10 23 50 0 p11 7 50 8 &
size 6 10 3 10 rat 1 1 1 1.1
gen zone brick p0 0 0 8 p1 7 0 8 p2 0 50 8 p3 0 0 50 &
p4 7 50 8 p5 0 50 50 p6 15 0 50 p7 15 50 50 &
size 3 10 10 rat 1 1 1.1
;对称得出1/2模型
gen zon reflect dip 0 ori 0 0 0 range x 0 23 y 0 50 z 8 50
gen zon reflect dip 0 ori 0 0 0 range x 23 50 y 0 50 z 0 50
;建立主隧道和辅助隧道块名称
group service range cyl end1 0 0 -1 end2 0 50 -1 rad 3
group main range cyl end1 15 0 0 end2 15 50 0 rad 4
;对称得出完整模型
gen zon reflect dip 90 dd 270 ori 0 0 0
;网格显示
plot set rotation 30 0 30
plot block group