Re: velikonoce

From: Spock (spock@bfs.cz)
Date: 11. 07. 2000, 22:27 CEST


>Mam algoritmus na vypocet data velikonocni nedele ktery pocita to
>datum podle astronomickych hodnot. Ale zjistil jsem v kalendarich
>ze nekdy jsou velikonoce o tyden posunute jinak nez podle toho
>vypoctu. Nevite nekdo cim to je? /Ten vypocet je z astronomicke
>rocenky tak by mel byt spravne/. Chtel bych to pouzit v programu,
>neexistuje na to nejaka korekce nebo tak neco? Diky, pako Paco.

jo. astronomicky je totiz datum velikonoc definovano jako prvni
nedele nasledujici po okamziku prvniho uplnku nasledujiciho po
okamziku jarni rovnodennosti. ale astronomicke a "kostelnicke"
velikonoce se muzou nekdy (i kdyz zridka) lisit. proc, to nevim
a je mi to srdecne jedno. asi porad pouzivaji stary, mene presny
postup. mam takovej gaussuv algoritmus, kterej pocita spravne
prave to kostelnicke datum.

upozornuju, ze je to jenom cistej algoritmus a pro pouziti v prg
si ho musis prislusne upravit. veskere deleni je jen celociselne
a zbytky se vyhazujou. takze podle jazyka budto pouzit integer
a celociselne deleni nebo vsechna deleni (pozor na zavorky ve
vyrazech) pozavirat do funkci int(), floor() a pod. m je mesic,
d je den a y je gregoriansky rok. melo by to udajne fungovat az
do roku 2146. pak je potreba zmenit nektere konstanty (nevim
ktere a jak, nejsem carl friedrich gauss :))

C=Y/100
N=Y-19*(Y/19)
K=(C-17)/25
A=C-C/4-(C-K)/3+19*N+15
A=A-30*(A/30)
A=A-(A/28)*(1-(A/28)*(29/(A+1))*((21-N)/11))
B=Y+Y/4+A+2-C+C/4
B=B-7*(B/7)
L=A-B
M=3+(L+40)/44
D=L+28-31*(M/4)

bye, spock.



This archive was generated by hypermail 2.1.2 : 04. 09. 2001, 02:54 CEST