Kuu tõusu- ja loojangu ajad

[A.R.]

fail "moonup.bas"

Kuu faasi arvutamise peale raiskan ka tervelt 0,5ms 32MHz takti juures !
Mul on faasi arvutuses nagunii Y3K viga sees

Miks see kuu liikumine nii kiire on et pool ms igavik tundub?

Kirjutasin selle bas-i C-ks ringi.
Proovisin et PICi C-s on funktsioonid olemas ja
katsetasin siis PC LCC-32 all.

Töötab, kiiresti, kõik on ilus aga tulemus on et
MOON UP ALL DAY

Tore programm.
Ilmselt sai kuskil midagi natuke ...

Eile õhtul otsisin ja leidsin ühe teise "kuuuurija"
http://www.moshier.net/ seal cmoon.zip

Too oli nõus arvutama sellise vahemikus
interval from 3000 B.C. to 3000 A.D.
sellise täpsusega
* Years Arc
* from J2000 Seconds
* ---------- -------
* 0 0
* 100 .006
* 200 .006
* 500 .015
* 1000 .28
* 2000 6.4
* 3000 38.
* 10000 9400.

Kõik muutujad ikka double, 12 kohta peale koma.
Ainult et kasutas funktsioone milliseid ma näinud pole.
nt epsiln() ?

Vot selline lugu.
Tuleb ikka neid astronoomidest kursa-vendi-õdesid kiusata.