pfw06.c		pfw06.c
	skipping to change at line 83		skipping to change at line 83
	** Called:		** Called:
	** eraObl06 mean obliquity, IAU 2006		** eraObl06 mean obliquity, IAU 2006
	**		**
	** 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;		double t;
	/* Interval between fundamental date J2000.0 and given date (JC). */		/* Interval between fundamental date J2000.0 and given date (JC). */
	t = ((date1 - DJ00) + date2) / DJC;		t = ((date1 - ERFA_DJ00) + date2) / ERFA_DJC;
	/* P03 bias+precession angles. */		/* P03 bias+precession angles. */
	*gamb = ( -0.052928 +		*gamb = ( -0.052928 +
	( 10.556378 +		( 10.556378 +
	( 0.4932044 +		( 0.4932044 +
	( -0.00031238 +		( -0.00031238 +
	( -0.000002788 +		( -0.000002788 +
	( 0.0000000260 )		( 0.0000000260 )
	* t) * t) * t) * t) * t) * DAS2R;		* t) * t) * t) * t) * t) * ERFA_DAS2R;
	*phib = ( 84381.412819 +		*phib = ( 84381.412819 +
	( -46.811016 +		( -46.811016 +
	( 0.0511268 +		( 0.0511268 +
	( 0.00053289 +		( 0.00053289 +
	( -0.000000440 +		( -0.000000440 +
	( -0.0000000176 )		( -0.0000000176 )
	* t) * t) * t) * t) * t) * DAS2R;		* t) * t) * t) * t) * t) * ERFA_DAS2R;
	*psib = ( -0.041775 +		*psib = ( -0.041775 +
	( 5038.481484 +		( 5038.481484 +
	( 1.5584175 +		( 1.5584175 +
	( -0.00018522 +		( -0.00018522 +
	( -0.000026452 +		( -0.000026452 +
	( -0.0000000148 )		( -0.0000000148 )
	* t) * t) * t) * t) * t) * DAS2R;		* t) * t) * t) * t) * t) * ERFA_DAS2R;
	*epsa = eraObl06(date1, date2);		*epsa = eraObl06(date1, date2);
	return;		return;
	}		}
	/*----------------------------------------------------------------------		/*----------------------------------------------------------------------
	**		**
	**		**
	** Copyright (C) 2013, NumFOCUS Foundation.		** Copyright (C) 2013, NumFOCUS Foundation.
	** All rights reserved.		** All rights reserved.
End of changes. 4 change blocks.
	4 lines changed or deleted		4 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/