倾斜直墙半圆拱形巷道快速建立Flac3D代码模型

更新时间:2023-07-29 20:22:55 阅读: 评论:0

new
t log on
t logfile Log-moxing.dat
;首先建立中间巷道,以巷道中线为原点
define BaParameter
tunnel_Rad=2.7            ;巷道半径2.7m
angle=15*degrad      ;岩层倾角20度
Length_x=60              ;x方向长度
Length_y=10              ;x方向长度
Length_z=60              ;z方向长度
z_tunnel_top=28.2          ;巷道中心线上部z的厚度28.2m
z_tunnel_bottom=31.8          ;巷道中心线下部z的厚度31.8m
wall=1.8            ;墙高1.8m
side=2.3              ;帮部外扩长度
top=1.3            ;顶部外扩长度 
zlsy_top=12              ;巷道中心线至上部分中粒砂岩厚度12m
zlsy_bottom=8              ;巷道中心线至下部分中粒砂岩厚度8m
coal_top=3.4            ;二1煤上部分厚度3.4m
jiagan=1              ;夹矸厚度1m
coal_bottom=4.6            ;二1煤下部分厚度4.6m
end
BaParameter
;
++++++++++++++++++++++++巷道周边中粒砂岩+++++++++++++++++++++++++++++
;右半圆坐标
define RightSemicircle_Coordinates
x0=0
y0=0
z0=0
x1=tunnel_Rad+side
y1=0
z1=side*tan(angle)
x2=0
y2=Length_Y
z2=0
x3=0
y3=0
z3=tunnel_Rad+top
x4=tunnel_Rad+side
y4=Length_Y
z4=side*tan(angle)
x5=0
y5=Length_Y
z5=tunnel_Rad+top
x6=tunnel_Rad+side
y6=0
z6=(tunnel_Rad+top)+((tunnel_Rad+side)*tan(angle))
x7=tunnel_Rad+side
y7=Length_Y
z7=(tunnel_Rad+top)+((tunnel_Rad+side)*tan(angle))
x8=tunnel_Rad
y8=0
z8=0
x9=0
y9=0
z9=tunnel_Rad
x10=tunnel_Rad
y10=Length_Y
z10=0
x11=0
y11=Length_Y
z11=tunnel_Rad
end
;左半圆坐标
define LeftSemicircle_Coordinates
x0=0
y0=0
z0=0
x1=0
y1=0
z1=tunnel_Rad+top
x2=0
y2=Length_Y
z2=0
x3=-1*(tunnel_Rad+side)
y3=0
z3=-1*side*tan(angle)
x4=0
y4=Length_Y
z4=tunnel_Rad+top
x5=-1*(tunnel_Rad+side)
菠萝蜜怎么剥
y5=Length_Y
z5=-1*side*tan(angle)
x6=-1*(tunnel_Rad+side)
y6=0
z6=(tunnel_Rad+top)-((tunnel_Rad+side)*tan(angle))
x7=-1*(tunnel_Rad+side)
y7=Length_Y
z7=(tunnel_Rad+top)-((tunnel_Rad+side)*tan(angle))
x8=0
y8=0
z8=tunnel_Rad
x9=-1*tunnel_Rad
y9=0
z9=0
x10=0
y10=Length_Y
z10=tunnel_Rad
x11=-1*tunnel_Rad
y11=Length_Y
z11=0
end
;巷道下部墙
define tunnel_wall
x0=-1*tunnel_Rad
y0=0
z0=-1*wall
x1=tunnel_Rad
y1=0
z1=-1*wall
x2=-1*tunnel_Rad
y2=Length_Y
z2=-1*wall
x3=-1*tunnel_Rad
y3=0
z3=0
end双子座的男生
;巷道左侧
define tunnel_left
x0=-1*(tunnel_Rad+side)
y0=0
z0=-1*side*tan(angle)-wall
x1=-1*tunnel_Rad
y1=0
z1=-1*wall
x2=-1*(tunnel_Rad+sid
e)
y2=Length_Y
z2=-1*side*tan(angle)-wall
x3=-1*(tunnel_Rad+side)
y3=0
z3=-1*side*tan(angle)
end
巷道右侧
define tunnel_right
x0=tunnel_Rad
y0=0
z0=-1*wall
x1=tunnel_Rad+side
y1=0
z1=-1*wall+side*tan(angle)
x2=tunnel_Rad
y2=Length_Y
z2=-1*wall
x3=tunnel_Rad
y3=0
z3=0
end
;巷道下部分
define tunne
l_bottom
x0=-1*(tunnel_Rad+side)
y0=0
z0=-1*(2*tunnel_Rad+side)*tan(angle)-wall
x1=tunnel_Rad
y1=0
z1=-1*wall
x2=-1*(tunnel_Rad+side)
y2=Length_Y
z2=-1*(2*tunnel_Rad+side)*tan(angle)-wall
x3=-1*(tunnel_Rad+side)
y3=0
z3=-1*side*tan(angle)-wall
x4=tunnel_Rad
y4=Length_Y
z4=-1*wall
x5=-1*(tunnel_Rad+side)
y5=Length_Y
z5=-1*side*tan(angle)-wall
x6=-1*tunnel_Rad
y6=0
z6=-1*wall
x7=-1*tunnel_Rad
y7=Length_Y
z7=-1*wall
end
;建立左半圆模型
LeftSemicircle_Coordinates
generate zone radcylinder p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 p4 x4 y4 z4 p5 x5 y5 z5 p6 x6 y6 z6 p7 x7 y7 z7 p8 x8 y8 z8 & p9 x9 y9 z9 p10 x10 y10 z10 p11 x11 y11 z11 dimension tunnel_Rad tunnel_Rad tunnel_Rad tunnel_Rad size 6 10 15 6 group 中粒砂岩 fill group 巷道
;建立右半圆模型
绣球狗
RightSemicircle_Coordinates
generate zone radcylinder p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 p4 x4 y4 z4 p5 x5 y5 z5 p6 x6 y6 z6 p7 x7 y7 z7 p8 x8 y8 z8 & p9 x9 y9 z9 p10 x10 y10 z10 p11 x11 y11 z11 dimension tunnel_Rad tunnel_Rad tunnel_Rad tunnel_Rad size 6 10 15 6 group 中粒砂岩 fill group 巷道
;建立巷道下部墙模型
tunnel_wall
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 size 12 10 6 group 巷道
;巷道左侧模型
tunnel_left
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 size 6 10 6 group 中粒砂岩
;巷道右侧模型
tunnel_right
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 size 6 10 6 group 中粒砂岩
;巷道下部分模型
tunnel_bottom
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 p4 x4 y4 z4 p5 x5 y5 z5 p6 x6 y6 z6 p7 x7 y7 z7 size 6 10 12 group 中粒砂岩
;++++++++++++++++++++++++巷道左右侧中粒砂岩+++++++++++++++++++++++++++++
;巷道围岩左部分
define Around_left1
x0=-1*(tunnel_Rad+side)
y0=0
z0=-1*side*tan(angle)
x1=-1*(tunnel_Rad+side)
y1=0
z1=(tunnel_Rad+top)-((tunnel_Rad+side)*tan(angle))
x2=-1*(tunnel_Rad+side)
y2=Length_Y
z2=-1*side*tan(angle)
x3=-1*Length_x/2
y3=0
z3=-1*(Length_x/2-tunnel_Rad)*tan(angle)
end
define Around_left2
x0=-1*(tunnel_Rad+side)
y0=0
z0=-1*side*tan(angle)-wall
x1=-1*(tunnel_Rad+side)
y1=0
z1=-1*side*tan(angle)
x2=-1*(tunnel_Rad+side)
y2=Length_Y
z2=-1*side*tan(angle)-wall
x3=-1*Length_x/2
y3=0
z3=-1*(Length_x/2-
tunnel_Rad)*tan(angle)-wall
end
define Around_left3
x0=-1*(tunnel_Rad+side)
y0=0
z0=-1*(2*tunnel_Rad+side)*tan(angle)-wall
涉故台x1=-1*(tunnel_Rad+side)
y1=0
z1=-1*side*tan(angle)-wall
x2=-1*(tunnel_Rad+side)
y2=Length_Y
z2=-1*(2*tunnel_Rad+side)*tan(angle)-wall
x3=-1*Length_x/2
y3=0
z3=-1*(Length_x/2+tunnel_Rad)*tan(angle)-wall
end
Around_left1
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 size 8 10 20 ratio 1 1 1.1 group 中粒砂岩
Around_left2
generate zone brick p0 x0 y0 z0 p1 x1 y1
z1 p2 x2 y2 z2 p3 x3 y3 z3 size 6 10 20 ratio 1 1 1.1 group 中粒砂岩
Around_left3
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 size 12 10 20 ratio 1 1 1.1 group 中粒砂岩
;巷道围岩右部分
define Around_right1
x0=tunnel_Rad+side
y0=0
z0=side*tan(angle)
x1=Length_x/2
y1=0
z1=(Length_x/2-tunnel_Rad)*tan(angle)
x2=tunnel_Rad+side
y2=Length_Y
z2=side*tan(angle)
x3=tunnel_Rad+side
y3=0
z3=(tunnel_Rad+top)+((tunnel_Rad+side)*tan(angle))
end
define Around_right2
x0=tunnel_Rad+side
y0=0
z0=side*tan(angle)-wall
x1=Length_x/2
y1=0
z1=(Length_x/2-tunnel_Rad)*tan(angle)-wall
x2=tunnel_Rad+side
y2=Length_Y
z2=side*tan(angle)-wall
x3=tunnel_Rad+side
y3=0
z3=side*tan(angle)
end
Around_right1
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 size 20 10 7 ratio 1.1 1 1 group 中粒砂岩
Around_right2
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 size 20 10 6 ratio 1.1 1 1 group 中粒砂岩
;++++++++++++++++++++++++巷道上部分中粒砂岩+++++++++++++++++++++++++++++
define Around_top1_1
x0=-1*(tunnel_Rad+side)
y0=0
z0=(tunnel_Rad+top)-((tunnel_Rad+side)*tan(angle))
x1=-1*(tunnel_Rad+side)
y1=0
z1=zlsy_top-(tunnel_Rad+side)*tan(angle)
x2=-1*(tunnel_Rad+side)
y2=Length_Y
z2=(tunnel_Rad+top)-((tunnel_Rad+side)*tan(angle))
x3=-1*Length_x/2
y3=0
z3=-1*(Length_x/2)*tan(angle)+tunnel_Rad+top
end
define Around_top1_2
x0=-1*(tunnel_Rad+side)
y0=0
z0=(tunnel_Rad+top)-((tunnel_Rad+side)*tan(angle)) 起诉离婚程序怎么走
x1=0
y1=0
z1=tunnel_Rad+top
x2=-1*(tunnel_Rad+side)
y2=Length_Y
z2=(tunnel_Rad+top)-((tunnel_Rad+side)*tan(angle))
x3=-1*(tunnel_Rad+side)
y3=0
z3=zlsy_top-(tunnel_Rad+side)*tan(angle)
end
define Around_top1_3
x0=0
y0=0
警衔z0=tunnel_Rad+top
x1=tunnel_Rad+side
y1=0
z1=(tunnel_Rad+top)+((tunnel_Rad+side)*tan(angle))
x2=0
y2=Length_Y
z2=tunnel_Rad+top
x3=0
y3=0
z3=zlsy_top
end
define Around_top1_4
x0=tunnel_Rad+side
y0=0
z0=(tunnel_Rad+top)+((tunnel_Rad+side)*tan(angle))
x1=Length_x/2
y1=0
z1=(Length_x/2)*tan(angle)+tunnel_Rad+top
x2=tunnel_Rad+side
y2=Length_Y
z2=(tunnel_Rad+top)+((tunnel_Rad+side)*tan(angle))
x3=tunnel_Rad+side
y3=0
z3=zlsy_top+((tunnel_Rad+side)*tan(angle))
end
Around_top1_1
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 size 10 10 20 ratio 1.1 1 1.1 group 中粒砂岩
Around_top1_2
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 size 7 10 10 ratio 1 1 1.1 group 中粒砂岩
Around_top1_3
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 size 8 10 10 ratio 1 1 1.1 group 中粒砂岩
Around_top1_4
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 size 20 10 10 ratio 1.1 1 1.1 group 中粒砂岩
;++++++++++++++++++++++++巷道下部分中粒砂岩+++++++++++++++++++++++++++++
define Around_bottom1_1
x0=
-1*(tunnel_Rad+side)
y0=0
z0=-1*zlsy_bottom-(tunnel_Rad+side)*tan(angle)
x1=-1*(tunnel_Rad+side)
y1=0
z1=-1*(2*tunnel_Rad+side)*tan(angle)-wall
x2=-1*(tunnel_Rad+side)
y2=Length_Y
z2=-1*zlsy_bottom-(tunnel_Rad+side)*tan(angle)
x3=-1*Length_x/2
y3=0
z3=-1*(Length_x/2)*tan(angle)-zlsy_bottom
end
define Around_bottom1_2
x0=-1*(tunnel_Rad+side)
y0=0
z0=-1*zlsy_bottom-(tunnel_Rad+side)*tan(angle)
x1=tunnel_Rad
y1=0
z1=-1*zlsy_bottom+tunnel_Rad*tan(angle)
x2=-1*(tunnel_Rad+side)
y2=Length_Y
z2=-1*zlsy_bottom-(tunnel_Rad+side)*tan(angle)
x3=-1*(tunnel_Rad+side)
y3=0
z3=-1*(2*tunnel_Rad+side)*tan(angle)-wall
end
define Around_bottom1_3
x0=tunnel_Rad
y0=0
z0=-1*zlsy_bottom+tunnel_Rad*tan(angle)
x1=tunnel_Rad+side
y1=0
z1=-1*zlsy_bottom+(tunnel_Rad+side)*tan(angle)
x2=tunnel_Rad
y2=Length_Y
z2=-1*zlsy_bottom+tunnel_Rad*tan(angle)
x3=tunnel_Rad
y3=0
z3=-wall
end
define Around_bottom1_4
x0=tunnel_Rad+side
y0=0
z0=-1*zlsy_bottom+(tunnel_Rad+side)*tan(angle)
x1=Length_x/2
y1=0
z1=((Length_x/2)*tan(angle))-zlsy_bottom
x2=tunnel_Rad+side
y2=Length_Y
z2=-1*zlsy_bottom+(tunnel_Rad+side)*tan(angle)
x3=tunnel_Rad+side
y3=0
z3=-1*wall+side*tan(angle)
end
Around_bottom1_1
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 size 10 10 20 ratio 0.9 1 1.1 group 中粒砂岩
Around_bottom1_2
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 size 6 10 10 ratio 1 1 0.9 group 中粒砂岩
Around_bottom1_3
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 size 6 10 10 ratio 1 1 0.9 group 中粒砂岩
Around_bottom1_4
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 size 20 10 10 ratio 1.1 1 0.9 group 中粒砂岩
;++++++++++++++++++++++++巷道上部分细粒砂岩+++++++++++++++++++++++++++++
define Around_top2_1
x0=-1*(tunnel_Rad+side)
y0=0
z0=zlsy_top-((tunnel_Rad+side)*tan(angle))
x1=-1*(tun
nel_Rad+side)
y1=0
z1=z_tunnel_top
x2=-1*(tunnel_Rad+side)
y2=Length_Y
z2=zlsy_top-((tunnel_Rad+side)*tan(angle))
x3=-1*Length_x/2
y3=0
z3=zlsy_top-(Length_x/2)*tan(angle)
x4=-1*(tunnel_Rad+side)
y4=Length_Y
z4=z_tunnel_top
x5=-1*Length_x/2吕皇后
y5=Length_Y
z5=zlsy_top-(Length_x/2)*tan(angle)
x6=-1*Length_x/2
y6=0
z6=z_tunnel_top
x7=-1*Length_x/2
y7=Length_Y
z7=z_tunnel_top
end
define Around_top2_2
x0=-1*(tunnel_Rad+side)
y0=0
z0=zlsy_top-((tunnel_Rad+side)*tan(angle))
x1=0
y1=0
z1=zlsy_top
x2=-1*(tunnel_Rad+side)
y2=Length_Y
z2=zlsy_top-((tunnel_Rad+side)*tan(angle))
x3=-1*(tunnel_Rad+side)
y3=0
z3=z_tunnel_top
x4=0
y4=Length_Y
z4=zlsy_top
x5=-1*(tunnel_Rad+side)
y5=Length_Y
z5=z_tunnel_top
x6=0
y6=0
z6=z_tunnel_top
x7=0
y7=Length_Y
z7=z_tunnel_top
end
define Around_top2_3
x0=0
y0=0
z0=zlsy_top
x1=tunnel_Rad+side
y1=0
z1=zlsy_top+((tunnel_Rad+side)*tan(angle))
x2=0
y2=Leng
th_Y
z2=zlsy_top
x3=0
y3=0
z3=z_tunnel_top
x4=tunnel_Rad+side
y4=Length_Y
z4=zlsy_top+((tunnel_Rad+side)*tan(angle))
x5=0
y5=Length_Y
z5=z_tunnel_top
x6=tunnel_Rad+side
y6=0
z6=z_tunnel_top
x7=tunnel_Rad+side
y7=Length_Y
z7=z_tunnel_top
end
define Around_top2_4
x0=tunnel_Rad+side
y0=0
z0=zlsy_top+((tunnel_Rad+side)*tan(angle))
x1=Length_x/2
y1=0
z1=(Length_x/2)*tan(angle)+zlsy_top
x2=tunnel_Rad+side
y2=Length_Y
z2=zlsy_top+((tunnel_Rad+side)*tan(angle))
x3=tunnel_Rad+side
y3=0
z3=z_tunnel_top
x4=Length_x/2
y4=Length_Y
z4=(Length_x/2)*tan(angle)+zlsy_top
x5=tunnel_Rad+side
y5=Length_Y
z5=z_tunnel_top
x6=Length_x/2
y6=0
z6=z_tunnel_top
x7=Length_x/2
y7=Length_Y
z7=z_tunnel_top
end
Around_top2_1
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 p4 x4 y4 z4 p5 x5 y5 z5 p6 x6 y6 z6 p7 x7 y7 z7 size 10 10 20 ratio 1.1 1 1.1 group 细粒砂岩
Around_top2_2
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 p4 x4 y4 z4 p5 x5 y5 z5 p6 x6 y6 z6 p7 x7 y7 z7 size 7 10 10 ratio 1 1 1.1 group 细粒砂岩
Around_top2_3
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 p4 x4 y4 z4 p5 x5 y5 z5 p6 x6 y6 z6 p7 x7 y7 z7 size 8 10 10 ratio 1 1 1.1 group 细粒砂岩
Around_top2_4
generate zone brick p0 x0 y0 z0 p1 x1 y1 z1 p2 x2 y2 z2 p3 x3 y3 z3 p4 x4 y4 z4 p5 x5 y5 z5 p6 x6 y6 z6 p7 x7 y7 z7 size 20 10 10 ratio 1.1 1 1.1 group 细粒砂岩
;++++++++++++++++++++++++巷道下部分二1煤+++++++++++++++++++++++++++++
define Around_bottom2_1
x0=-1*(tunnel_Rad+side)
y0=0
z0=-1*zlsy_bottom-(tunnel_Rad+side)
*tan(angle)-coal_top
x1=-1*(tunnel_Rad+side)
y1=0
z1=-1*zlsy_bottom-(tunnel_Rad+side)*tan(angle)
x2=-1*(tunnel_Rad+side)
y2=Length_Y
z2=-1*zlsy_bottom-(tunnel_Rad+side)*tan(angle)-coal_top
x3=-1*Length_x/2
y3=0
z3=-1*(Length_x/2)*tan(angle)-zlsy_bottom-coal_top
end
define Around_bottom2_2
x0=-1*(tunnel_Rad+side)
y0=0
z0=-1*zlsy_bottom-(tunnel_Rad+side)*tan(angle)-coal_top
x1=tunnel_Rad
y1=0
z1=-1*zlsy_bottom+tunnel_Rad*tan(angle)-coal_top
x2=-1*(tunnel_Rad+side)
y2=Length_Y
z2=-1*zlsy_bottom-(tunnel_Rad+side)*tan(angle)-coal_top
x3=-1*(tunnel_Rad+side)
y3=0
z3=-1*zlsy_bottom-(tunnel_Rad+side)*tan(angle)
end
define Around_bottom2_3
x0=tunnel_Rad
y0=0
z0=-1*zlsy_bottom+tunnel_Rad*tan(angle)-coal_top
x1=tunnel_Rad+side
y1=0
z1=-1*zlsy_bottom+(tunnel_Rad+side)*tan(angle)-coal_top
x2=tunnel_Rad
y2=Length_Y
z2=-1*zlsy_bottom+tunnel_Rad*tan(angle)-coal_top
x3=tunnel_Rad
y3=0
z3=-1*zlsy_bottom+tunnel_Rad*tan(angle)
低钾血症的临床表现end
define Around_bottom2_4
x0=tunnel_Rad+side
y0=0
z0=-1*zlsy_bottom+(tunnel_Rad+side)*tan(angle)-coal_top
x1=Length_x/2
y1=0
z1=((Length_x/2)*tan(angle))-zlsy_bottom-coal_top
x2=tunnel_Rad+side
y2=Length_Y
z2=-1*zlsy_bottom+(tunnel_Rad+side)*tan(angle)-coal_top
x3=tunnel_Rad+side
y3=0
z3=-1*zl

本文发布于:2023-07-29 20:22:55,感谢您对本站的认可!

本文链接:https://www.wtabcd.cn/fanwen/fan/89/1101182.html

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系,我们将在24小时内删除。

标签:巷道   砂岩   中粒
相关文章
留言与评论(共有 0 条评论)
   
验证码:
推荐文章
排行榜
Copyright ©2019-2022 Comsenz Inc.Powered by © 专利检索| 网站地图