🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.sys.atari.st
Article #2458

Re: Will Your SW Make it to the year 2000?

#2458
From: Joe Smith
Date: Wed, 19 Jul 1989 00:26
14 lines
1145 bytes
In article <061089A1311@syntel.UUCP> dal@syntel.UUCP (Dale Schumacher) writes:
<	return(	((146097L * c) >> 2) +
<		((1461L * y) >> 2) +
<		(((153L * m) + 2) / 5) +
<		d + 1721119L );

I love it!  One question though, what in the heck is the 1721119 for?
That many days is over 4000 years.  That constant should be -68142 if
you want day 1 to be 18-Nov-1858, right?
-- 
Joe Smith (408)922-6220 | SMTP: JMS@F74.TYMNET.COM or jms@tymix.tymnet.com
McDonnell Douglas FSCO  | UUCP: ...!{ames,pyramid}!oliveb!tymix!tardis!jms
PO Box 49019, MS-D21    | PDP-10 support: My car's license plate is "POPJ P,"
San Jose, CA 95161-9019 | narrator.device: "I didn't say that, my Amiga did!"
Technical Details
Message-ID: <438@tardis.Tymnet.COM>
Path: arc1-ca.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!rutgers!apple!oliveb!tymix!tardis!jms
References: <061089A1311@syntel.UUCP>

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!rutgers!apple!oliveb!tymix!tardis!jms
From: jms@tardis.Tymnet.COM (Joe Smith)
Newsgroups: comp.sys.atari.st
Subject: Re: Will Your SW Make it to the year 2000?
Keywords: Julian Date
Message-ID: <438@tardis.Tymnet.COM>
Date: 19 Jul 89 00:26:48 GMT
References: <061089A1311@syntel.UUCP>
Reply-To: jms@tardis.Tymnet.COM (Joe Smith)
Organization: McDonnell Douglas Field Service Co, San Jose CA
Lines: 14