Changeset 18921 for trunk/FACT++/erfa/src/jd2cal.c

Timestamp:

10/18/17 14:07:51 (7 years ago)

Author:

tbretz

Message:

Updated to ERFA 1.4.0

File:

• trunk/FACT++/erfa/src/jd2cal.c (modified) (4 diffs)

trunk/FACT++/erfa/src/jd2cal.c

@@ -22 +22 @@
 **               int      status:
 **                           0 = OK
-**                          -1 = unacceptable date (Note 3)
+**                          -1 = unacceptable date (Note 1)
 **
 **  Notes:
@@ -51 +51 @@
 **     Section 12.92 (p604).
 **
-**  Copyright (C) 2013-2016, NumFOCUS Foundation.
+**  Copyright (C) 2013-2017, NumFOCUS Foundation.
 **  Derived, with permission, from the SOFA library.  See notes at end of file.
 */
@@ -82 +82 @@
    f = fmod(f1 + f2, 1.0);
    if (f < 0.0) f += 1.0;
-   d = floor(d1 - f1) + floor(d2 - f2) + floor(f1 + f2 - f);
-   jd = (long) floor(d) + 1L;
+   d = ERFA_DNINT(d1-f1) + ERFA_DNINT(d2-f2) + ERFA_DNINT(f1+f2-f);
+   jd = (long) ERFA_DNINT(d) + 1L;
 
 /* Express day in Gregorian calendar. */
@@ -104 +104 @@
 **  
 **  
-**  Copyright (C) 2013-2016, NumFOCUS Foundation.
+**  Copyright (C) 2013-2017, NumFOCUS Foundation.
 **  All rights reserved.
 **