- 1、本文档共21页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
摄影测量程序汇总(后方交会前方交会单模型光束法平差)[精品]
程序运行环境为Visual Studio2010.运行前请先将坐标数据放在debug下。
单像空间后方交会
内方位元素 x0(/mm) y0(/mm) 主距f(/mm) 比例尺分母 0 0 153.24 50000 像点坐标(/mm) 物点坐标(/m) -86.15 -68.99 36589.41 25273.32 2195.17 -53.4 82.21 37631.08 31324.51 728.69 -14.78 -76.63 39100.97 24934.98 2386.5 10.46 64.43 40426.54 30319.81 757.31
C语言程序:
#include stdio.h
#include math.h
#include iostream
double *readdata();
void savedata(int hang,double *data,double *xishuarray,double *faxishu,double *l,int i,double xs,double ys,double zs,double fai,double oumiga,double kapa);
void transpose(double *m1,double *m2,int m,int n);
void inverse(double *a,int n);
void multi(double *mat1,double * mat2,double * result,int a,int b,int c);
void inverse(double *a,int n)/*正定矩阵求逆*/
{
int i,j,k;
for(k=0;kn;k++)
{
for(i=0;in;i++)
{
if(i!=k)
*(a+i*n+k)=-*(a+i*n+k)/(*(a+k*n+k));
}
*(a+k*n+k)=1/(*(a+k*n+k));
for(i=0;in;i++)
{
if(i!=k)
{
for(j=0;jn;j++)
{
if(j!=k)
*(a+i*n+j)+=*(a+k*n+j)* *(a+i*n+k);
}
}
}
for(j=0;jn;j++)
{
if(j!=k)
*(a+k*n+j)*=*(a+k*n+k);
}
}
}
void transpose(double *m1,double *m2,int m,int n) //矩阵转置
{ int i,j;
for(i=0;im;i++)
for(j=0;jn;j++)
m2[j*m+i]=m1[i*n+j];
return;
}
void multi(double *mat1,double *mat2,double * result,int a,int b,int c)
{ int i,j,k;
for(i=0;ia;i++)
{for(j=0;jc;j++)
{result[i*c+j]=0;
for(k=0;kb;k++)
result[i*c+j]+=mat1[i*b+k]*mat2[k*c+j];
}
}
return;
}
double *readdata()
{
FILE *fp;
int i,j;
int number;
char datacatolog[100];
//scanf(%s,datacatolog);
if ((fp=fopen(控制点坐标.txt,r))==NULL)
{
printf(读取数据出错!\n);
return false;
}
fscanf(fp,%d,number);
double *cordata=new double[number*5];
for (i=0;inumber;i++)
{
for (j=0;j5;j++)
{
fscanf(fp,%lf,cordata+i*5+j);
}
}
printf(控制点坐标数据读取成功!\n);
return cordata;
}
void savedata(int hang,double *data,double *xishuarray,double *faxishu,double *l,int i,double xs,double ys,double zs,double fai,double oumiga,double
您可能关注的文档
- 手术室腹腔镜手术护理查房[精品].ppt
- 手术室小讲课手卫生ppt_图文[精品].ppt
- 手术患者病情评估管理制度[精品].doc
- 手术室护理实践指南2016完整版[精品].doc
- 手机充电器原理概述基础知识培训资料[精品].ppt
- 手机专业知识培训资料.ppt[精品].ppt
- 手机套餐优惠几何~文档[精品].doc
- 手机大卖场新员工基本素质培训[精品].ppt
- 手机成品检验标准[精品].doc
- 手机推广策划案智能机进入全国市场的策划案.doc[精品].doc
- 2025年萝卜刀危害主题班会.pptx
- 2025年南京新工投资集团有限责任公司人员招聘笔试备考题库附答案详解ab卷.docx
- 2024-2025学年度特种作业煤矿安全作业通关题库【黄金题型】附答案详解.docx
- 夏季施工方案.docx
- 人教版高一下学期英语(必修三)《Unit 4 Space Exploration》单元检测卷含答案.pdf
- 2024-2025学年度特种作业煤矿安全作业通关考试题库(重点)附答案详解.docx
- 2024-2025学年度特种作业煤矿安全作业通关题库【word】附答案详解.docx
- 事故应急预案编制文件是.docx
- 2024-2025学年度特种作业煤矿安全作业通关题库【满分必刷】附答案详解.docx
- 2024-2025学年度特种作业煤矿安全作业通关考试题库附答案详解(B卷).docx
文档评论(0)