gmst00.c		gmst00.c
	skipping to change at line 78		skipping to change at line 78
	** McCarthy, D. D., Petit, G. (eds.), IERS Conventions (2003),		** McCarthy, D. D., Petit, G. (eds.), IERS Conventions (2003),
	** IERS Technical Note No. 32, BKG (2004)		** IERS Technical Note No. 32, BKG (2004)
	**		**
	** Copyright (C) 2013, NumFOCUS Foundation.		** Copyright (C) 2013, NumFOCUS Foundation.
	** Derived, with permission, from the SOFA library. See notes at end of f ile.		** Derived, with permission, from the SOFA library. See notes at end of f ile.
	*/		*/
	{		{
	double t, gmst;		double t, gmst;
	/* TT Julian centuries since J2000.0. */		/* TT Julian centuries since J2000.0. */
	t = ((tta - DJ00) + ttb) / DJC;		t = ((tta - ERFA_DJ00) + ttb) / ERFA_DJC;
	/* Greenwich Mean Sidereal Time, IAU 2000. */		/* Greenwich Mean Sidereal Time, IAU 2000. */
	gmst = eraAnp(eraEra00(uta, utb) +		gmst = eraAnp(eraEra00(uta, utb) +
	( 0.014506 +		( 0.014506 +
	( 4612.15739966 +		( 4612.15739966 +
	( 1.39667721 +		( 1.39667721 +
	( -0.00009344 +		( -0.00009344 +
	( 0.00001882 )		( 0.00001882 )
	* t) * t) * t) * t) * DAS2R);		* t) * t) * t) * t) * ERFA_DAS2R);
	return gmst;		return gmst;
	}		}
	/*----------------------------------------------------------------------		/*----------------------------------------------------------------------
	**		**
	**		**
	** Copyright (C) 2013, NumFOCUS Foundation.		** Copyright (C) 2013, NumFOCUS Foundation.
	** All rights reserved.		** All rights reserved.
	**		**
End of changes. 2 change blocks.
	2 lines changed or deleted		2 lines changed or added
This html diff was produced by rfcdiff 1.41. The latest version is available from http://tools.ietf.org/tools/rfcdiff/