|
|
1.1 root 1: /*
2: * Convert COHERENT time into julian date
3: */
4: #include "time.h"
5: #include "local_misc.h"
6: jday_t
7: time_to_jday(t)
8: time_t t;
9: {
10: jday_t jd;
11: jd.j_s = (t += 86400L/2) % 86400L;
12: jd.j_d = (t / 86400L) + COHEPOCH;
13: return jd;
14: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.