空间后方交会程序.doc

空间后方交会程序.doc

ID:55123830

大小:164.00 KB

页数:8页

时间:2020-04-27

空间后方交会程序.doc_第1页
空间后方交会程序.doc_第2页
空间后方交会程序.doc_第3页
空间后方交会程序.doc_第4页
空间后方交会程序.doc_第5页
资源描述:

《空间后方交会程序.doc》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、一.实验目的:掌握摄影测量空间后方交会的原理,利用计算机编程语言实现空间后方交会外方位元素的解算。二.仪器用具及已知数据文件:计算机windowsxp系统,编程软件(VISUALC++6.0),地面控制点在摄影测量坐标系中的坐标及其像点坐标文件shuju.txt。三.实验内容:单张影像的空间后方交会:利用已知地面控制点数据及相应像点坐标根据共线方程反求影像的外方位元素。数学模型:共线条件方程式:求解过程:(1)获取已知数据。从航摄资料中查取平均航高与摄影机主距;获取控制点的地面测量坐标并转换为地面摄影测量坐标。(2)量测控制点的像点坐标并做系统改正。(3)确定未知数的初始值。在竖直摄影且

2、地面控制点大致分布均匀的情况下,按如下方法确定初始值,即:,,φ=ω=κ=0式中;m为摄影比例尺分母;n为控制点个数。(4)用三个角元素的初始值,计算个方向余弦,组成旋转矩阵R。(5)逐点计算像点坐标的近似值。利用未知数的近似值和控制点的地面坐标代入共线方程式,逐点计算像点坐标的近似值(x)、(y)。(6)逐点计算误差方程式的系数和常数项,组成误差方程式。(7)计算法方程的系数矩阵和常数项,组成法方程式。(8)解法方程,求得外方位元素的改正数,,,dφ,dω,dκ。(9)用前次迭代取得的近似值,加本次迭代的改正数,计算外方位元素的新值。第8页共8页(10)将求得的外方位元素改正数与规定的

3、限差比较,若小于限差则迭代结束。否则用新的近似值重复(4)~(9),直到满足要求为止。四.实验结果:程序的源代码如下所示:#include#include#include#include#include#defineN4voidturn(double*A,doubleA2[],intm,intn)//计算矩阵的转置{inti,j;for(i=0;i

4、e*C,intam,intan,intbm,intbn)//计算两矩阵相乘{inti,j,l,u;if(an!=bm){printf("error!cannotdothemultiplication.");return;}for(i=0;i

5、doubled,p;is=(int*)malloc(n*sizeof(int));js=(int*)malloc(n*sizeof(int));第8页共8页for(k=0;k<=n-1;k++){d=0.0;for(i=k;id){d=p;is[k]=i;js[k]=j;}}if(d+1.0==1.0){free(is);free(js);printf("errornotinv");returnNULL;}if(is[k]!=k)for(j=0;j

6、s[k]*n+j;p=a[u];a[u]=a[v];a[v]=p;}if(js[k]!=k)for(i=0;i

7、=i*n+k;a[u]=-a[u]*a[l];}}for(k=n-1;k>=0;k--){if(js[k]!=k)for(j=0;j<=n-1;j++){u=k*n+j;v=js[k]*n+j;p=a[u];a[u]=a[v];a[v]=p;}if(is[k]!=k)for(i=0;i

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。