From: <mk...@us...> - 2003-08-15 08:19:09
|
Update of /cvsroot/csp/APPLICATIONS/SimData/Source In directory sc8-pr-cvs1:/tmp/cvs-serv30151 Modified Files: Date.cpp Log Message: Index: Date.cpp =================================================================== RCS file: /cvsroot/csp/APPLICATIONS/SimData/Source/Date.cpp,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** Date.cpp 15 Aug 2003 06:59:16 -0000 1.6 --- Date.cpp 15 Aug 2003 08:05:10 -0000 1.7 *************** *** 427,439 **** double DateZulu::getAccurateMST(radian_t longitude) const { ! double JD = getJulianDate(); ! double T = (JD - EPOCH) * SIMDATA_F1p0_36525p0; ! double F = DAYSEC * (JD - (int) JD); ! double GMST = COEFF0 - DAYSEC/2.0L ! + ((COEFF1 + (COEFF2 + COEFF3 * T) * T) * T) + F; ! GMST = GMST * SEC2RAD; ! int n = (int) (GMST * (0.5/PI)); ! if (n < 0) n--; ! return GMST - n*(2.0*PI) + longitude; } --- 427,431 ---- double DateZulu::getAccurateMST(radian_t longitude) const { ! return getMST(longitude); } *************** *** 443,447 **** double F = DAYSEC * (JD - (int) JD); double GMST = COEFF0 - DAYSEC/2.0L ! + COEFF1 * T + F; GMST = GMST * SEC2RAD; int n = (int) (GMST * (0.5/PI)); --- 435,439 ---- double F = DAYSEC * (JD - (int) JD); double GMST = COEFF0 - DAYSEC/2.0L ! + ((COEFF1 + (COEFF2 + COEFF3 * T) * T) * T) + F; GMST = GMST * SEC2RAD; int n = (int) (GMST * (0.5/PI)); |