Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.1 6/24/83; site pur-ee.UUCP
Path: utzoo!watmath!clyde!burl!ulysses!mhuxr!ihnp4!inuxc!pur-ee!wd9get
From: wd9get@pur-ee.UUCP (Brandt)
Newsgroups: net.astro
Subject: Phase of the Moon program update
Message-ID: <2565@pur-ee.UUCP>
Date: Thu, 24-Jan-85 21:12:38 EST
Article-I.D.: pur-ee.2565
Posted: Thu Jan 24 21:12:38 1985
Date-Received: Fri, 25-Jan-85 22:01:17 EST
Organization: Electrical Engineering Department , Purdue University
Lines: 18


  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 */