摄影测量程序汇总(后方交会+前方交会+单模型光束法平差)[精品].doc

程序运行环境为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