SLA_DJCL

MJD to Year,Month,Day,Frac

ACTION:
Modified Julian Date to Gregorian year, month, day, and fraction of a day.
CALL:
CALL sla_DJCL (DJM, IY, IM, ID, FD, J)
GIVEN:

DJM

D

modified Julian Date (JD2400000.5)


RETURNED:

IY

I

year

IM

I

month

ID

I

day

FD

D

fraction of day

J

I

status:

  0 = OK

1 = unacceptable date

            (before 4701 BC March 1)


REFERENCE:
The algorithm is adapted from Hatcher, Q. Jl. R. astr. Soc. (1984) 25, 53-55.