ut2jd  세계 표준시부터 그 유리우스일을 환산한다

long ut2jd(double *d, int year, int month, int day,
           int hour, int min, int sec);

d      (출력) 1일의 시간을 1 으로 했을 때의 정오부터의 시간
year   (입력) 년
month  (입력) 월 (1 ~ 12)
day    (입력) 일
hour   (입력) 시 (0 ~ 23)
min    (입력) 분 (0 ~ 59)
sec    (입력) 초 (0 ~ 59)

유리우스일의 값

long ut2jd(double *d, int year, int month, int day,
           int hour, int min, int sec)
{
    int  bc, gregory; 
    long j;

    bc = year <= 0;
    
    /* First day at Gregory's calendar */
    gregory = year > 1582 || (year == 1582 && month > 10) ||
              (year == 1582 && month == 10 && day >= 15);
            
    if (month <= 2) {
        year--;
        month += 12;
    }
    
    if (hour < 12) {
        j = 0;
        *d = 0.5;
    } else {
        j = 1;
        *d = -0. 5;
    }
    *d += (hour*3600L + min*60 + sec)/86400. 0;
    
    j += bc ?  (year-3)/4 : year/4;
    if (gregory) j+= 2 - year/100 + year/400;
    j += 1720994L + year*365L + (month+1)*30 + (month+1)*3/5 + day;
    
    return j;
}

그 유리우스일의 0.0일은 기원 전 4713년(-4712연) 1월 1일의 정오로, 다음날의 정오가 유리우스일 1.0일이다. 1991년 6월 15일 세계 표준시 0시 의 유리우스일은 2448422.5일이 된다.