Re: Movable Feasts

Les Koehler Wed, 29 Dec 2010 08:00:53 -0800

So just change the / to % and you have a Rexx program :-)


Les

Jim Bohnsack wrote:

Here are dates that could be put into a table.

The following are dates of Easter from 1980 to 2024:

1980 April 6 1995 April 16 2010 April 4

1981 April 19 1996 April 7 2011 April 24

1982 April 11 1997 March 30 2012 April 8

1983 April 3 1998 April 12 2013 March 31

1984 April 22 1999 April 4 2014 April 20

1985 April 7 2000 April 23 2015 April 5

1986 March 30 2001 April 15 2016 March 27

1987 April 19 2002 March 31 2017 April 16

1988 April 3 2003 April 20 2018 April 1

1989 March 26 2004 April 11 2019 April 21

1990 April 15 2005 March 27 2020 April 12

1991 March 31 2006 April 16 2021 April 4

1992 April 19 2007 April 8 2022 April 17

1993 April 11 2008 March 23 2023 April 9

1994 April 3 2009 April 12 2024 March 31




Here's the formula. It's a SMOP (simple matter of programming).


 Computing the Date of Easter
The rule is that Easter is the first Sunday after the firstecclesiastical full moon that occurs on or after March 21. The lunarcycles used by the ecclesiastical system are simple to program. Thefollowing algorithm will compute the date of Easter in the GregorianCalendar system.
Please note the following: *This is an _integer_ calculation. Allvariables are integers and all remainders from division are dropped.*
The algorithm uses the year, /y/, to give the month, /m/, and day, /d/,of Easter. The symbol * means multiply.
 c = y / 100
 n = y - 19 * ( y / 19 )
 k = ( c - 17 ) / 25
 i = c - c / 4 - ( c - k ) / 3 + 19 * n + 15
 i = i - 30 * ( i / 30 )
 i = i - ( i / 28 ) * ( 1 - ( i / 28 ) * ( 29 / ( i + 1 ) )
 * ( ( 21 - n ) / 11 ) )
 j = y + y / 4 + i + 2 - c + c / 4
 j = j - 7 * ( j / 7 )
 l = i - j
 m = 3 + ( l + 40 ) / 44
 d = l + 28 - 31 * ( m / 4 )


For example, using the year 2010,
y=2010,
c=2010/100=20,
n=2010 - 19 x (2010/19) = 15,
etc. resulting in Easter on April 4, 2010.
The algorithm is due to J.-M. Oudin (1940) and is reprinted in theExplanatory Supplement to the Astronomical Almanac<http://aa.usno.navy.mil/publications/docs/related.html#expsup>, ed. P.K. Seidelmann (1992). See Chapter 12, "Calendars"<http://astro.nmsu.edu/%7Elhuber/leaphist.html>, by L. E. Doggett.
Jim



On 12/29/2010 8:42 AM, Buettner, Wolfgang wrote:
This is a multi-part message in MIME format.

------_=_NextPart_001_01CBA75E.2DEACDB1
Content-Type: text/plain;
 charset=us-ascii
Content-Transfer-Encoding: quoted-printable

We have some services which should be up during normal working hours
only, i.e. not on weekends and not on public holidays either.

Could be done by WAKEUP, but ...

How to code movable feasts like Easter Monday and others depending on
the first full moon in spring?

I know the formula is complex, so I believe it would be very much
simpler to get those dates from an actual calendar and hard-code them
each year than to write a REXX.

Any other ideas?



Thank you and a Happy New Year,

Wolfgang
Software AG - Group Executive Board: Karl-Heinz Streibich(Vorsitzender/Chai=rman), Arnd Zinnhardt, Mark Edwards, David Broadbent, JosefBommersbach, Dr.=
 Wolfram Jost, Kamyar Niroumand, Ivo Totev
Sitz/Registered office: Uhlandstra?e 12, 64297 Darmstadt, Germany, -Registe=rgericht/Commercial register: Darmstadt HRB 1562 - Vorstand/Management Boar=d: Karl-Heinz Streibich (Vorsitzender/Chairman), David Broadbent, Dr.Wolfra=m Jost, Arnd Zinnhardt; - Aufsichtsratsvorsitzender/ Chairman of theSupervi=
sory Board: Dr. Andreas Bereczky - http://www.softwareag.com/


------_=_NextPart_001_01CBA75E.2DEACDB1
Content-Type: text/html;
 charset=us-ascii
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0Transitional//EN"><HTML><head><M=ETA content=3D"text/html; charset=3Dus-ascii"http-equiv=3D"Content-Type">
<META content=3D"text/html; charset=3Dus-ascii"http-equiv=3DContent-Type>
<META content=3D"MSHTML 8.00.6001.18999" name=3DGENERATOR></head><BODY>
<DIV>
<DIV>
Wehave s=
ome services which should be up during normal working hours
only, i.e. not on weekends and not on public holidays either.
<S=PAN lang=3DEN-GB style=3D"mso-ansi-language: EN-GB"><?xml:namespaceprefix =
=3D o ns =3D
"urn:schemas-microsoft-com:office:office" /><o:p><SPANclass=3D729260409-011=
22010>Could be done by WAKEUP, but
=2E..&nbsp;</o:p>
Howto co=
de&nbsp;movable feasts like Easter Monday and others
depending on the first full moon in spring?<o:p></o:p>
Iknow th=
e formula is complex, so I
believe it would be very much simpler to <SPANclass=3D7292=
60409-01122010>getthose dates
from an actual calendar and hard-code them each year thanto wri=
te a
REXX.<o:p></o:p=

Anyother=ideas? <o=
:p></o:p>
=
&nbsp;<o:p></o:p>
Thank you=
 and a Happy New
Year,<o:=
p></o:p>
Wolfgang<SPANlang=3DES><o:p></o=
:p></DIV> 
<DIV ALIGN=3D"left"> </DIV>
<DIV ALIGN=3D"center">
<TABLE BORDER=3D"1" BORDERCOLOR=3D"#666666" CELLPADDING=3D"5"CELLSPACING=
=3D"0" WIDTH=3D"100%">
<TBODY>
<TR>
<TD>
<DIV ALIGN=3D"left"><FONTFACE=
=3D"Trebuchet MS">
Software AG– Group Executive Board: Karl-Heinz Streibich(Vorsitzende=r/Chairman), Arnd Zinnhardt, Mark Edwards, David Broadbent, JosefBommersbac=
h, Dr. Wolfram Jost, Kamyar Niroumand, Ivo Totev 
Sitz/Registered office: Uhlandstraße 12, 64297 Darmstadt,Germany,&#82=11; Registergericht/Commercial register: Darmstadt HRB 1562 -Vorstand/ Mana=gement Board: Karl-Heinz Streibich (Vorsitzender/Chairman), DavidBroadbent,=Dr. Wolfram Jost, Arnd Zinnhardt; - Aufsichtsratsvorsitzender/Chairman of =
the Supervisory Board: Dr. Andreas Bereczky-=
<A HREF=3D"http://www.softwareag.com/";><FONTFACE=3D"Tr=ebuchet MS"><FONTCOLOR=3D"navy">http://www.softwar=eag.com</A></DIV></TD></TR></TB=
ODY></TABLE></DIV>
<DIV ALIGN=3D"left"></DIV><DIV> </DIV></DIV></BODY></=
HTML>

------_=_NextPart_001_01CBA75E.2DEACDB1--

Re: Movable Feasts

Reply via email to