空间直角坐标系与大地坐标系转换程序
#include #include #include using namespace std; #define PI *asin) void main() { double a,b,c,d1,d2,f1,f2,m1,m2,B,L,H,X,Y,Z,W,N,e; . B=atan(t); W=sqrt(1-e*e*sin(B)*sin(B)); N=a/W; H=Z/sin(B) - N*(1-e*e); int i; for(i=1;fabs(B-B0)>10E-10;i++)//每一次新的B与上一次计算的B比较，误差小于10E-10 rad {B0=B; n=t; t=m+P*n/sqrt(k+n*n);//迭代 B=atan(t); } W=sqrt(1-e*e*sin(B)*sin(B)); N=a/W; //if((X<0)&(Y>0)) //L=atan(Y/X)+PI; //if((X<0)&(Y<0)) // L=atan(Y/X)+PI; // if((X>0)&(Y<0)) //L=2*PI-atan(Y/X); L=atan2(Y,X); H=sqrt(X*X+Y*Y)/cos(B)-N; int Bd,Bf,Ld,Lf; double Bm,Lm; B=180*B/PI;//B转化为度做单位 Bd=B; Bf=(B-Bd)*60; Bm=((B-Bd)*60-Bf)*60; L=180*L/PI;//L转化为度做单位 Ld=L; Lf=(L-Ld)*60; Lm=((L-Ld)*60-Lf)*60; cout<<\"大地坐标系中纬度，经度，大地高（国际单位）分别为\"< } } } 运行结果 因篇幅问题不能全部显示，请点此查看更多更全内容