欢迎来到天天文库
浏览记录
ID:57185167
大小:230.50 KB
页数:13页
时间:2020-08-05
《摄影测量学空间后方交会实验报告.doc》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、摄影测量学实验报告实验一、单像空间后方交会学院:建测学院班级:测绘082姓名:肖澎学号:15一.实验目的1.深入了解单像空间后方交会的计算过程;2.加强空间后方交会基本公式和误差方程式,法线方程式的记忆;3.通过上机调试程序加强动手能力的培养。二.实验原理以单幅影像为基础,从该影像所覆盖地面范围内若干控制点和相应点的像坐标量测值出发,根据共线条件方程,求解该影像在航空摄影时刻的相片外方位元素。三.实验内容1.程序图框图2.实验数据(1)已知航摄仪内方位元素f=153.24mm,Xo=Yo=0。限差0.1秒(2)已知4对点的影像坐标和地面坐标:影像坐标地面坐标x(mm)y(
2、mm)X(m)Y(m)Z(m)1-86.15-68.9936589.4125273.322195.172-53.4082.2137631.0831324.51728.693-14.78-76.6339100.9724934.982386.50410.4664.4340426.5430319.81757.313.实验程序usingSystem;usingSystem.Collections.Generic;usingSystem.Linq;usingSystem.Text;namespaceConsoleApplication3{classProgram{staticvoi
3、dMain(){//输入比例尺,主距,参与平参点的个数Console.WriteLine("请输入比例尺分母m:r");stringm1=Console.ReadLine();doublem=(double)Convert.ToSingle(m1);Console.WriteLine("请输入主距f:r");stringf1=Console.ReadLine();doublef=(double)Convert.ToSingle(f1);Console.WriteLine("请输入参与平差控制点的个数n:r");stringn1=Console.ReadLine();
4、intn=(int)Convert.ToSingle(n1);//像点坐标的输入代码double[]arr1=newdouble[2*n];//1.像点x坐标的输入for(inti=0;i5、("请输入已进行系统误差改正的像点坐标的y{0}值:r",i+1);stringv=Console.ReadLine();for(intj=1;j6、uble)Convert.ToSingle(u);}//2.控制点Y坐标的输入for(intk=0;k7、e();arr2[p,2]=(double)Convert.ToSingle(w);}//确定外方位元素的初始值//1.确定Xs的初始值:doubleXs0=0;doublesumx=0;for(intj=0;j
5、("请输入已进行系统误差改正的像点坐标的y{0}值:r",i+1);stringv=Console.ReadLine();for(intj=1;j6、uble)Convert.ToSingle(u);}//2.控制点Y坐标的输入for(intk=0;k7、e();arr2[p,2]=(double)Convert.ToSingle(w);}//确定外方位元素的初始值//1.确定Xs的初始值:doubleXs0=0;doublesumx=0;for(intj=0;j
6、uble)Convert.ToSingle(u);}//2.控制点Y坐标的输入for(intk=0;k7、e();arr2[p,2]=(double)Convert.ToSingle(w);}//确定外方位元素的初始值//1.确定Xs的初始值:doubleXs0=0;doublesumx=0;for(intj=0;j
7、e();arr2[p,2]=(double)Convert.ToSingle(w);}//确定外方位元素的初始值//1.确定Xs的初始值:doubleXs0=0;doublesumx=0;for(intj=0;j
此文档下载收益归作者所有