obl80.c		obl80.c
	skipping to change at line 54		skipping to change at line 54
	** P. Kenneth Seidelmann (ed), University Science Books (1992),		** P. Kenneth Seidelmann (ed), University Science Books (1992),
	** Expression 3.222-1 (p114).		** Expression 3.222-1 (p114).
	**		**
	** 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, eps0;		double t, eps0;
	/* Interval between fundamental epoch J2000.0 and given date (JC). */		/* Interval between fundamental epoch J2000.0 and given date (JC). */
	t = ((date1 - DJ00) + date2) / DJC;		t = ((date1 - ERFA_DJ00) + date2) / ERFA_DJC;
	/* Mean obliquity of date. */		/* Mean obliquity of date. */
	eps0 = DAS2R * (84381.448 +		eps0 = ERFA_DAS2R * (84381.448 +
	(-46.8150 +		(-46.8150 +
	(-0.00059 +		(-0.00059 +
	( 0.001813) * t) * t) * t);		( 0.001813) * t) * t) * t);
	return eps0;		return eps0;
	}		}
	/*----------------------------------------------------------------------		/*----------------------------------------------------------------------
	**		**
	**		**
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/