csp-commits

[<mk...@us...>]

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));