[net.astro] Phase of the Moon program update

wd9get@pur-ee.UUCP (Brandt) (01/25/85)

  I finally got a copy of the 1985 Astronomical Almanac so I can
now update the epoch information in my phase of the moon program
(pom.c) that I posted earlier this week. I have included the
#define statements from the beginning to the program that need
to be updated.  Even though the previous version of the program
used a 1983 epoch, the accumulated error is small.

--Keith E. Brandt
  pur-ee!wd9get


#define EPOCH   1985
#define EPSILONg 279.611371     /* solar ecliptic long at EPOCH */
#define RHOg     282.680403     /* solar ecliptic long of perigee at EPOCH */
#define e          0.01671542   /* solar orbit eccentricity */
#define lzero     18.251907     /* lunar mean long at EPOCH */
#define Pzero    192.917585     /* lunar mean long of perigee at EPOCH */
#define Nzero     55.204723     /* lunar mean long of node at EPOCH */