pn06.c		pn06.c
	skipping to change at line 103		skipping to change at line 103
	**		**
	** Wallace, P.T. & Capitaine, N., 2006, Astron.Astrophys. 459, 981		** Wallace, P.T. & Capitaine, N., 2006, Astron.Astrophys. 459, 981
	**		**
	** 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 gamb, phib, psib, eps, r1[3][3], r2[3][3], rt[3][3];		double gamb, phib, psib, eps, r1[3][3], r2[3][3], rt[3][3];
	/* Bias-precession Fukushima-Williams angles of J2000.0 = frame bias. */		/* Bias-precession Fukushima-Williams angles of J2000.0 = frame bias. */
	eraPfw06(DJM0, DJM00, &gamb, &phib, &psib, &eps);		eraPfw06(ERFA_DJM0, ERFA_DJM00, &gamb, &phib, &psib, &eps);
	/* B matrix. */		/* B matrix. */
	eraFw2m(gamb, phib, psib, eps, r1);		eraFw2m(gamb, phib, psib, eps, r1);
	eraCr(r1, rb);		eraCr(r1, rb);
	/* Bias-precession Fukushima-Williams angles of date. */		/* Bias-precession Fukushima-Williams angles of date. */
	eraPfw06(date1, date2, &gamb, &phib, &psib, &eps);		eraPfw06(date1, date2, &gamb, &phib, &psib, &eps);
	/* Bias-precession matrix. */		/* Bias-precession matrix. */
	eraFw2m(gamb, phib, psib, eps, r2);		eraFw2m(gamb, phib, psib, eps, r2);
End of changes. 1 change blocks.
	1 lines changed or deleted		1 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/