Changeset 5808 in ntrip for trunk/BNC/src/bncmodel.cpp
- Timestamp:
- Aug 6, 2014, 11:16:40 AM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/BNC/src/bncmodel.cpp
r5807 r5808 346 346 satData->rho = (satData->xx - xRec).norm_Frobenius(); 347 347 348 double tropDelay = delay_saast(xRec, satData->eleSat) +348 double tropDelay = t_tropo::delay_saast(xRec, satData->eleSat) + 349 349 trp() / sin(satData->eleSat); 350 350 … … 385 385 return satData->rho + phaseCenter + antennaOffset + clk() 386 386 + offset - satData->clk + tropDelay + wind; 387 }388 389 // Tropospheric Model (Saastamoinen)390 ////////////////////////////////////////////////////////////////////////////391 double bncModel::delay_saast(const ColumnVector& xyz, double Ele) {392 393 Tracer tracer("bncModel::delay_saast");394 395 if (xyz[0] == 0.0 && xyz[1] == 0.0 && xyz[2] == 0.0) {396 return 0.0;397 }398 399 double ell[3];400 xyz2ell(xyz.data(), ell);401 double height = ell[2];402 403 double pp = 1013.25 * pow(1.0 - 2.26e-5 * height, 5.225);404 double TT = 18.0 - height * 0.0065 + 273.15;405 double hh = 50.0 * exp(-6.396e-4 * height);406 double ee = hh / 100.0 * exp(-37.2465 + 0.213166*TT - 0.000256908*TT*TT);407 408 double h_km = height / 1000.0;409 410 if (h_km < 0.0) h_km = 0.0;411 if (h_km > 5.0) h_km = 5.0;412 int ii = int(h_km + 1);413 double href = ii - 1;414 415 double bCor[6];416 bCor[0] = 1.156;417 bCor[1] = 1.006;418 bCor[2] = 0.874;419 bCor[3] = 0.757;420 bCor[4] = 0.654;421 bCor[5] = 0.563;422 423 double BB = bCor[ii-1] + (bCor[ii]-bCor[ii-1]) * (h_km - href);424 425 double zen = M_PI/2.0 - Ele;426 427 return (0.002277/cos(zen)) * (pp + ((1255.0/TT)+0.05)*ee - BB*(tan(zen)*tan(zen)));428 387 } 429 388 … … 654 613 else if (par->type == bncParam::TROPO) { 655 614 ColumnVector xyz(3); xyz(1) = x(); xyz(2) = y(); xyz(3) = z(); 656 double aprTrp = delay_saast(xyz, M_PI/2.0);615 double aprTrp = t_tropo::delay_saast(xyz, M_PI/2.0); 657 616 strB << "\n trp = " << par->prn.toAscii().data() 658 617 << setw(7) << setprecision(3) << aprTrp << " "
Note:
See TracChangeset
for help on using the changeset viewer.