Hi, I know the fact that Mathematica do all of this but just in case you don’t have a internet connexion (in the field one night…) I offer you my summer work on programming the Astronomical Algorithms by Jean Meeus. I call my notebook « AstroLab.n » and my library is call « AstroLibrairie.m ». I am french canadian from Montréal Canada, so I mix english and french. My book is in english so all the functions names are in english but my notebook is in french (You can change all that…). You have to import the package (the library) and run the function Initialisation[] for the use of the package in your notebook or use the AstroLab.n notebook. You will have to change the path of the package to be able to run the library. After that, go to Evaluation Menu and click Evaluate Initialisation cells. You will be ask for your location, timezone, summer time and DeltaT. You can change the suggesttions because this is my home geolocation.
After that, you are ready… For exemple if you want to know the azimuth (from North) and altutude of Venus live, you enter

PlanetAh[{"Venus", FromLocalTimetoUniversalTime[ListNow[]]}]

and Voilà. I don’t make all the programs in the book but you can continue this work it is easy on Mathematica and very cool Note If you want to check for precision, put zero « 0 » in DeltaT at the initialisation, so the time will be Terrestrial Time and you will have the results of book like « The Astronomical Almanac » If you have comments, please let me know…I will try to ameliorate. This is my first programming experience with Mathematica so … Marcel

Attachments: