newdefassi_parameterrad=3.0;隧道洞径c1=10.0;埋深s=1.0;最小净距beta=15kd=4.0b=8.0*kd;宽度long=10long1=longlong2=long1+10.0x1=kdy2=longx2=-1.0*long*tan(beta*degrad)z3=8.0c=c1+z3int_x1=-1.0*(2.0*(rad+long*tan(beta*degrad)+s/2.0)+kd)int_x2=-1.0*(s+3.0*rad+long*tan(beta*degrad))int_x3=-1.0*(long*tan(beta*degrad)-rad);;;;;;;;;;;;;;;;x1_1=-1.0*(rad+long*tan(beta*degrad)+s/2.0)z3_1=-1.0*z3;;;;;;;;;;;;z3_2=-1.0*kdx10=-1.0*long*tan(beta*degrad)-rad;;;;;;;;;;;;;x1_2=-1.0*(rad+long*tan(beta*degrad));;;;;;;;;;;x2_3=rad-long*tan(beta*degrad);;;;;;;;;;;x0_4=-1.0*radz0_4=2.0*z3_2/3x2_4=-1.0*(rad+long*tan(beta*degrad));;;;;;;;;;;z1_5=-6.0*kd;决定模型底部的高度rad1=2.0*rad+s/2.0int_rad1=rad1+0.1int_rad2=rad1-0.1;;;;;;;;;;;;;x3_6=-1.0*rad;;;;;;;;;;;;;xz=-1.0*(2.0*(rad+long*tan(beta*degrad)+s/2.0))-bxz1=xz-0.1xz2=xz+0.1xy1=b-0.1xy2=b+0.1zx1=z1_5-0.1zx2=z1_5+0.1;;;;;;;;;;;;n1=b/2.0n2=longn3=radn3_1=c1/2n4=3n5=3.0*kdendassi_parameter;;;运行函数assi_parametergenzoneradcylinderp0=000p1=x100p2=x2y20p3=00z3p4=x1long0p5=x2y2z3p6=x10z3p7=x1longz3&dimension=radradradradsize=radlong6n4ratio=1111group1genzoneradcylinderp0=000p1=x1_100p2=x2y20p3=00z3_1p4=x1_1long0p5=x2longz3_1p6=x1_10z3_1p7=x1_1longz3_1&dimension=radradradradsize=radlong6n4ratio=1111group2genzonereflectdip=0dd=0origin=000rangegroup2;以水平面为对称面镜像delzonerangez=0,-10genzonebrickp0=rad00p1=rad0z3_2p2=x2_3y20p3=x100p4=x2_3y2z3_2p5=x1long0p6=x10z3_2p7=x1longz3_2size=radlongn4ratio=111group2genzonebrickp0=x0_40z0_4p1=x0_40z3_2p2=x2_4y2z0_4p3=rad0z0_4p4=x2_4y2z3_2p5=x2_3longz0_4p6=rad0z3_2p7=x2_3longz3_2&size=1long6ratio=111group1genzonebrickp0=x1_100p1=x1_10z3_2p2=x1_1y20p3=x0_400p4=x1_1y2z3_2p5=x2_4long0p6=x0_40z3_2p7=x2_4longz3_2&size=radlongn4ratio=111group2group1rangegroup2;;;;;;;;生成洞身右侧围岩genzonebrickp0=x100p1=b00p2=x1long20p3=x10z3size=n1long2radratio=111group1genzonebrickp0=x10z3_2p1=b0z3_2p2=x1long2z3_2p3=x100size=n1long2radratio=111group1;;;;;;;生成洞底下方围岩genzonebrickp0=rad0z3_2p1=rad0z1_5p2=x2_3y2z3_2p3=x10z3_2p4=x2_3y2z1_5p5=x1longz3_2p6=x10z1_5p7=x1longz1_5&size=n5longn4ratio=111group1genzonebrickp0=x0_40z3_2p1=x0_40z1_5p2=x2_4y2z3_2p3=rad0z3_2p4=x2_4y2z1_5p5=x2_3longz3_2p6=rad0z1_5p7=x2_3longz1_5&size=n5long6ratio=111group1genzonebrickp0=x1_10z3_2p1=x1_10z1_5p2=x1_1y2z3_2p3=x0_40z3_2p4=x1_1y2z1_5p5=x2_4longz3_2p6=x0_40z1_5p7=x2_4longz1_5&size=n5longn4ratio=111group1;;;;;;生成洞顶上部围岩genzonebrickp0=00z3p1=x10z3p2=x2y2z3p3=00cp4=x1longz3p5=x2y2cp6=x10cp7=x1longcsize=radlongn3_1ratio=111group1genzonebrickp0=x1_10z3p1=00z3p2=x1_1longz3p3=x1_10cp4=x2longz3p5=x1_1longcp6=00cp7=x2longcsize=radlongn3_1ratio=111group1genzonebrickp0=x10z1_5p1=b0z1_5p2=x1long2z1_5p3=x10z3_2size=n1long2n5ratio=1111group1genzonebrickp0=x10z3p1=b0z3p2=x1long2z3p3=x10csize=n1long2n3_1ratio=1111group1;;;;;;;生成大跨度段洞顶上方围岩genzonebrickp0=x2long1z3p1=x1long1z3p2=x2long2z3p3=x2long1csize=radlongn3_1ratio=111group1genzonebrickp0=x1_1long1z3p1=x2long1z3p2=x1_1long2z3p3=x1_1long1csize=radlongn3_1ratio=111group1;;;;;;;生成大跨度段洞底下方围岩genzonebrickp0=x2_3long1z3_2p1=x2_3long1z1_5p2=x2_3long2z3_2p3=x1long1z3_2size=n5longn4ratio=111group1genzonebrickp0=x2_4long1z3_2p1=x2_4long1z1_5p2=x2_4long2z3_2p3=x2_3long1z3_2size=n5long6ratio=111group1genzonebrickp0=x1_1long1z3_2p1=x1_1long1z1_5p2=x1_1long2z3_2p3=x2_4long1z3_2size=n5longn4ratio=111group1;;;;;;;生成大跨度段洞身直边墙genzonebrickp0=x2_3long10p1=x2_3long1z3_2p2=x2_3long20p3=x1long10size=n4longn4ratio=111group1genzonebrickp0=x2_4long1z0_4p1=x2_4long1z3_2p2=x2_4long2z0_4p3=x2_3long1z0_4size=1long6ratio=111group1genzonebrickp0=x1_1long1z0_4p1=x1_1long1z3_2p2=x1_1long2z0_4p3=x2_4long1z0_4size=1longn4ratio=111group1genzonereflectdip=90dd=90origin=x1_100;以竖直面为对称面镜像;;;;;;;生成大跨度段洞身拱顶genzoneradcylinderp0=x1_1long10p1=x1long10p2=x1_1long20p3=x1_1long1z3dimension=rad1rad1rad1rad1size=1109n4ratio=110.871group2genzonereflectdip=90dd=90origin=x1_100rangegroup2;以竖直面为对称面镜像;;;;;;;;;;;生成小净距隧道genzonecylinderp0=000p1=rad00p2=x2y20p3=00radsizeradlong6group3genzonecylinderp0=000p1=00radp2=x2y20p3=x3_600sizeradlong6group3genzonebrickp0=x0_40z0_4p1=rad0z0_4p2=x2_4y2z0_4p3=x0_400p4=x2_3longz0_4p5=x2_4y20p6=rad00p7=x2_3long0&size=6long2ratio=111group3genzonereflectdip=90dd=90origin=x1_100rangegroup3;以竖直面为对称面镜像;;;;;;;;;;;生成大跨度隧道genzonecylinderp0=x1_1long10p1=add(rad100)p2=x1_1long20p3=x1_1long1rad1sizerad1long9ratio=110.871group4genzonebrickp0=x2_4long1z0_4p1=x2_3long1z0_4p2=x2_4long2z0_4p3=x1_1long10p4=x2_3long2z0_4&p5=x1_1long20p6=x2_3long10p7=x2_3long20size=6long2ratio=111group5genzonewedgep0=x1_1long1z0_4p1=x2_4long1z0_4p2=x1_1long2z0_4p3=x1_1long10size=3long2ratio=111group5genzonereflectdip=90dd=90origin=x1_100rangegroup4;以竖直面为对称面镜像genzonereflectdip=90dd=90origin=x1_100rangegroup5;以竖直面为对称面镜像generatemerge0.3rangex=x1y=long1long2z=0z3generatemerge0.3rangex=int_x1y=long1long2z=0z3generatemerge0.83rangex=int_x1x1y=long1long2z=z3generatemerge0.202rangex=int_x1x1y=long1z=0z3attachfacerangex=int_x1x1y=long1z=0z3;genseparate4;int1facerangex=int_x2int_x3y=long1long2z=0;int1facerangex=int_x2int_x3z=0rad1&;cylinderend1=x1_1long10end2=x1_1long