double lk=gcz[k]-(szd_gc[j]-szd_gc[i]);//获得第 k 个自由项
ATPL[i]-=Pk*lk;//获得法方程自由项
ATPL[j]+=Pk*lk;
ATPA[ij(i,i)]+=Pk;//获得法方程系数矩阵
ATPA[ij(j,j)]+=Pk;
ATPA[ij(i,j)]-=Pk;
}
}
高程平差值计算
//////////////////////////////////////////////////////////////////////////
//
void SZWPC::ca_dX()
{
for(int i=0;i
}
return(pvv);
}
//////////////////////////////////////////////////////////////////////////
// 原始数据和平差值输出
void SZWPC::printresult(char *resultfile)
{
// 残差计算
double pvv=ca_V();
ofstream outfile(resultfile,ios::out);//以输出方式打开文件,若文件不存在,创建文件
//输出原始观测数据
outfile<