fasa03.c   fasa03.c 
skipping to change at line 44 skipping to change at line 44
** Souchay, J., Loysel, B., Kinoshita, H., Folgueira, M. 1999, ** Souchay, J., Loysel, B., Kinoshita, H., Folgueira, M. 1999,
** Astron.Astrophys.Supp.Ser. 135, 111 ** Astron.Astrophys.Supp.Ser. 135, 111
** **
** 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 a; double a;
/* Mean longitude of Saturn (IERS Conventions 2003). */ /* Mean longitude of Saturn (IERS Conventions 2003). */
a = fmod(0.874016757 + 21.3299104960 * t, D2PI); a = fmod(0.874016757 + 21.3299104960 * t, ERFA_D2PI);
return a; return a;
} }
/*---------------------------------------------------------------------- /*----------------------------------------------------------------------
** **
** **
** Copyright (C) 2013, NumFOCUS Foundation. ** Copyright (C) 2013, NumFOCUS Foundation.
** All rights reserved. ** All rights reserved.
** **
 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/