小坳坡隧道开挖程序123.doc

《小坳坡隧道开挖程序123.doc》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、K为测点对应里程,N为测点对应里程隧中的左右值，左为负右为正。P是测点与对应里程设计高的高差值，在量取S的超欠值时P值大于0.37是向隧心的方向量取（圆拱），P值小于0.37则横向量取S值（向内倾斜的直墙）。P值小于0.94时，S值是垂直向下的距离。（仰拱）DATAIFK<561569orK>563212:ThenCLS:Locate6,2，“KPOUT”◢STOP:IFEND:IFK≦562783:THEN7.23→R:7.0363→W：0.2389042833→O:GOTO1：IFEND:（四级）IFK≦562893:THEN7.13→R:6.923→W：0.231700000→O

2、:GOTO1：IFEND:（三级）LB11：隧道超欠子程序CQD开挖IfP≥0.75:Then√(N2+(P-2.43)2)-R→S:IfEnd:IfP≤0.75AndP＞-1.2:ThenAbsN-(W-Abs(O×(P+(-0.75))））→S:IfEnd:“S=”:S←