测量平差编程(12)

if(js[k]!=k)

for(i=0;i<=n-1;i++) { }

u=i*n+k;v=i*n+js[k];

p=a[i][k];a[i][k]=a[i][js[k]];a[i][js[k]]=p;

l=k*n+k;

a[k][k]=1.0/a[k][k]; for(j=0;j<=n-1;j++)

if(j!=k) {

u=k*n+j;a[k][j]=a[k][j]*a[k][k]; }

if(i!=k) if(j!=k) { } if(i!=k) { }

u=i*n+k;a[i][k]=-a[i][k]*a[k][k]; u=i*n+j;

a[i][j]=a[i][j]-a[i][k]*a[k][j];

for(i=0;i<=n-1;i++) for(j=0;j<=n-1;j++)

for(i=0;i<=n-1;i++)

}

for(k=n-1;k>=0;k--) {

if(js[k]!=k)

for(j=0;j<=n-1;j++)

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说教育文库测量平差编程(12)在线全文阅读。