单一附合导线测量控制网平差程序.docx
- 文档编号:4381758
- 上传时间:2022-12-01
- 格式:DOCX
- 页数:9
- 大小:20.28KB
单一附合导线测量控制网平差程序.docx
《单一附合导线测量控制网平差程序.docx》由会员分享,可在线阅读,更多相关《单一附合导线测量控制网平差程序.docx(9页珍藏版)》请在冰豆网上搜索。
单一附合导线测量控制网平差程序
单一符合导线测量控制网平差程序
梁彩艳
(西北石油局工程服务大队,新疆乌鲁木齐830011)
摘要:
由于全站仪(光电仪)的不断普及,导线布网已在测量控制网中广泛应用。
为了简化计算,提高平差精度,节约
平差经费,结合实际工作中的一个实例,运用PC—E500计算器编制了单一符合导线高斯平差程序。
关键词:
单一;符合导线;平差程序
1差原理及程序框图(见图1)
2实例
在单一符合导线(如图2)中,已知各起始数据,观测了各折
角方向值,测量了各边长(见表1),观测方向中误差3r=士5〃,边长丈量中误差3si=士0.5simm,求各导线点的坐标平差值和最弱点4号点的点位精度(可假设单位权中误差30=士5〃,则观测角权为0.5,观测边权Psi=100/Si)。
图2单一符合导线示意图
表1测量数据一览表
点号
已知坐标(m)
XY
编号
已知坐标
方位角
B3020.348-9049.801aAB226°44’59〃C3702.437-10133.399aCD57°59’31〃编号观测角度编号
观测边长
(m)
1230°
32’
37〃
1204.952
2180°
00’
42〃
2200.130
3170°
39’
22〃
3345.153
4236°
48’
37〃
4278.059
5192°
14’
25〃
5451.692
6260°
59’
01〃
3平差程序
10:
REMSUB10-190QIUDAOXIANDIANGAILUEZUOBIAO
20:
REMSHUZU”A”WEIFANGWEIJIAO,”B”WEIGUANCEZUOJIAO,”S”WEIBIANCHANG”,P”WEIQUAN,”V”WEIGAIZHENGSHU”,MX、MY、M”WEIDAIQIUDIANZHONGWUCHA”,X、Y”WEIZUOBIAO
30:
INPUT”GUANCEJIAOGESHU:
N=”;N
40:
DIMA(N),B(N),S(N),X(23N),Y(23N),P(23
N),V(23N),MX(N),MY(N),M(N)
45:
FORI=1TON
50:
READB(I),S(I)
60:
B(I)=DEG(B(I))
70:
NEXTI
80:
INPUT”QISHIFANGWEIJIAO:
A0=”;A(0)
90:
A(0)=DEG(A(0))
100:
FORI=1TON
110:
A(I)=A(I-1)+B(I)+180
120:
IFA(I)>360THENA(I)=A(I)-360
130:
NEXTI
140:
INPUT”QISHIDIANZUOBIAO:
X0=”;X
(1),”Y0=”;Y
(1)
总第93期
2004年第2期
西部探矿工程
WEST-CHINAEXPLORATIONENGINEERINGseriesNo.93
Feb.2004
145:
PRINT”DAOXIANDIANGAILUEZUOBIAOZHI:
150:
FORI=2TON
160:
X(I)=X(I-1)+S(I-1)3COS(A(I-1)):
Y(I)=Y(I
-1)+S(I-1)3SIN(A(I-1))
170:
PRINT”X(”;I;”)=”;X(I),”Y(;”I;”)=”;Y(I)
180:
NEXTI
185:
LOCATE12
190:
PRINT”#####”
200:
REMSUB200-370QIUTIAOJIANFANGCHENGXISHU”A1,BI,C1”SHUZUJIQUANHANSHUXISHU”FX,FY”SHUZU
210:
DIMA1(23N-1),B1(23N-1),C1(23N-1),FX(2
3N-1),FY(23N-1)
220:
FORI=1TON
230:
READA1(I)
240:
NEXTI
250:
FORI=1TO23N-1
260:
B1(I)=(-Y(N)+Y(I))/206.26
270:
C1(I)=(X(N)-X(I))/206.26
280:
IFN C1(I)=SIN(A(I-N))290: NEXTI 300: INPUT”ZUIRUODIANHAO: FN=”;FN 310: FORI=1TO23N-1 320: FX(I)=(-Y(FN)+Y(I))/206.26 330: FY(I)=(X(FN)-X(I))/206.26 340: IFFN FY(I)=0 350: IFN FY(I)=SIN(A(I-N)) 360: IFI>N+FN-1THENFX(I)=0: FY(I)=0 370: NEXTI 414: INPUT”FUHEFANGWEIJIAO: A2=”;A2,”FUHEDIANZUOBIAO: X2=”;X2,”Y2=”;Y2 415: WA=-DEG(A2)+A(N): WX=-X2+X(N): WY= -Y2+Y(N) 416: WA=DMS(WA): IFWA>360THENWA=WA-360 419: WA=WA310000: WX=WX31000: WY=WY31000 420: REMSUB420-740JIESUANFAFANGCHENG 425: REMSUB430-470JISUANGUANCEJIAO、BIANDEQUAN 430: INPUT”JIASHEDANWEIQUANZHONGWUCHA: D0=”;D0 440: FORI=1TO23N-1450: P(I)=0.5460: IFI>NTHENP(I)=(D03D0)/(0.253S(I-N)) 470: NEXTI 500: REM”E”WEIDAIQUANQIUHEFUHAO 520: EAA=0: EAB=0: EAC=0: EAFX=0: EAFY=0 530: EBB=0: EBC=0: EBFX=0: EBFY=0 540: ECC=0: ECFX=0: ECFY=0: EFFX=0: EFFY=0 550: FORI=1TO23N-1 560: EAA=A1(I)3A1(I)/P(I)+EAA: EAB=A1(I)3B1 (I)/P(I)+EAB 570: EAC=A1(I)3B1(I)/P(I)+EAC: EAFX=A1(I)3FX (I)/P(I)+EAFX: EAFY=A1(I)3FY(I)/P(I)+EAFY 580: EBB=B1(I)3B1(I)/P(I)+EBB: EBC=B1(I)3C1 (I)/P(I)+EBC 590: EBFX=B1(I)3FX(I)/P(I)+EBFX: EBFY=B1(I)3FY(I)/P(I)+EBFY 600: ECC=C1(I)3C1(I)/P(I)+ECC: ECFX=C1(I)3FX (I)/P(I)+ECFX: ECFY=C1(I)3FY(I)/P(I)+ECFY 610: EFFX=FX(I)3FX(I)/P(I)+EFFX: EFFY=FY(I)3FY(I)/P(I)+EFFY 620: NEXTI 630: EBB1=EBB-EAB3EAB/EAA: EBC1=EBC-EAB3EAC/EAA: EWX1=WX-EAB3WA/EAA 640: EBFX1=EBFX-EAB3EAFX/EAA: EBFY1=EBFYEAB3EAFY/EAA 650: ECC2=ECC-EAC3EAC/EAA-EBC13EBC1/EBB1 660: EWY2=WY-EAC3WA/EAA-EBC13EWX1/EBB1 670: ECFX2=ECFX-EAC3EAFX/EAA-EBC13EBFX1/EBB1 680: ECFY2=ECFY-EAC3EAFY/EAA-EBC13EBFY1/EBB1 690: KC=-EWY2/ECC2 700: KB=-EBC13KC/EBB1-EWX1/EBB1 710: KA=-EAB3KB/EAA-EAC3KC/EAA-WA/EAA 720: EPVV=WA3WA/EAA+EWX13EWX1/EBB1+EWY23EWY2/ECC2 730: EFFX3=EFFX-EAFX3EAFX/EAA-EBFX13EBFX1/EBB1-ECFX23ECFX2/ECC2 740: EFFY3=EFFY-EAFY3EAFY/EAA-EBFY13EBFY1/EBB1-ECFY23ECFY2/ECC2 750: REMSUB750-910QIUGUANCEBIAN、JIAODE GAIZHENGSHU,DAOXIANDIANZUOBIAOPING CHAZHIJIZUIRUODIANJINGDUPINGDING 748: PRINT”V(1〜6)WEIGUANCEJIAOGAIZHENG SHU,V(7〜11)WEIBIANCHANGGAIZHENG SHU: ” 750: FORI=1TO23N-1 760: V(I)=(A1(I)3KA+B1(I)3KB+C1(I)3KC)/P(I) 770: IFI<=NTHENB(I)=B(I)+DEG(V(I)/10000) ELSES(I-N)=S(I-N)+V(I)/1000 780: PRINT”V(”;I;”)=”;V(I), 790: NEXTI 795: LOCATE12 798: PRINT”#####” 68西部探矿工程 Feb.2004 No.2 800: FORI=1TON 810: A(I)=A(I-1)+B(I)+180 820: IFA(I)>360THENA(I)=A(I)-360 830: NEXTI 835: PRINT”DAOXIANDIANPINGCHAZHI: ” 840: FORI=2TON 850: X(I)=X(I-1)+S(I-1)3COS(A(I-1)) 860: Y(I)=Y(I-1)+S(I-1)3SIN(A(I-1)) 870: PRINT”X(”;I;”)=”;X(I),”Y(;”I;”)=”;Y(I) 880: STOP 890: NEXTI 894: LOCATE12 896: PRINT”#####” 900: M0=SQR(EPVV/3): MX(FN)=M03SQR(EFFX3): MY(FN)=M03SQR(EFFY3): M(FN)=SQR(MX (FN)3MX(FN)+MY(FN)3MY(FN) 910: PRINT”JISUANDANWEIQUANZHONGWU CHA: M0=”;M0,”ZUIRUODIANWUCHA: M(”; FN;”)=”;M(FN);”mm” 911: LOCATE12 912: PRINT”#####” 914: LOCATE15 916: PRINT”END! ” 918: REM920HANGFANGZHIGUANCEZUOJIA、O BIANCHANGZHI,930HANGFANGZHIFANGWEI JIAOTIAOJIANXISHU 920: : DATA230.3237,204.952,180.0042,200.130,170.3922,345.153,236.4837,278.059,192.1425,451.692,260.5901,0 930: DATA1,1,1,1,1,1,0,0,0,0,0,0 940: END 4运行结果 RUN GUANCEJIAOGESHU: N=6 QISHIFANGWEIJIAO: A0=226.4459 QISHIDIANZUOBIAO: X0=3020.348 Y0=-9049.801 DAOXIANDIANGAILUEZUOBIAOZHI: X (2)= 3046.36649 Y (2)= -9253.09478 X(3)= 3071.81326 Y(3)= -9451.60039 X(4)= 3059.53346 Y(4)= -9796.53488 X(5)= 3286.66789 Y(5)= -9956.93052 X(6)= 3702.48850 Y(6)= -10133.33597 ##### ZUIRUODIANHAO: FN=4 FUHEFANGWEIJIAO: A2=57.5931 FUHEDIANZUOBIAO: X2=3702.437 Y2=-10133.399 JIASHEDANWEIQUANZHONGWUCHA: D0=5 V(1〜6)WEIGUANCEJIAOGAIZHENGSHU,V(7〜 11)WEIBIANCHANGGAIZHENGSHU: V (1)= -4.01 V (2)= -3.79 V(3)= -3.57 V(4)= -3.93 V(5)= -1.03 V(6)= 4.33 V(7)= 2.77 V(8)=2 .70 V(9)= 4.67 V(10)= 2.31 V(11)=2.64 ##### X (2)=3046.362887 X(3)=3071.802485 X(4)=3059.503514 X(5)=3286.62793 X(6)=3702.436997 ##### Y (2)=-9253.098035 Y(3)=-9451.607297 Y(4)=-9796.545774 Y(5)=-9956.959587 Y(6)=-10133.399 DAOXIANDIANZUOBIAOPINGCHAZHI: JISUANDANWEIQUANZHONGWUCHA: M0= 4.336768793 ZUIRUODIANWUCHA: M(4)=13.04462451mm ##### END! (上接第66页) 参考文献: [1]姜永智,廖雪珍,郭亮明,赵国育,刘宝山.铜湿法冶金技术的研究于 应用评述[J].甘肃有色金属,第17卷,第1期. [2]王成彦.低品位铜湿法冶炼的现状及发展趋势[J].新疆 地质,2001, 12. [3]向鹏成,谢英.溶浸技术在低品位矿石回收利用中的应用与 发展 [J].中国资源综合利用,2002,3. [4]刘大星.我国铜湿法冶金技术的进展[J].有色金属(矿山 部分), 2002,5. LeachingTechniqueanditsDevelopmentTrendofLow-GradeCopperOres ZHAOGuo2dong,WUHeng2shan,LIUQing,LIChao (SchoolofArchitecturalEngineering,ResourcesandEnvironment, NanhuaUniversity,Hengyang,Hunan,421001,China) Abstract: Thepresenceofthehydro-metallurgyforlow-gradecopperoresisintroduced.Themechanismandtechniqueofleachingareanalyzed.Opin2 ionsareputforwardaboutthedevelopingtrendofleachingforlow-grade copperores. Keywords: low-gradecopperore;leaching;development 69 2004年 第2期 梁彩艳: 单一符合导线测量控制网平差程序
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 单一 导线 测量 控制 网平差 程序