(TI59) Advances in Archaeological Method & Theory vol4

04192024, 09:19 PM
(This post was last modified: 04192024 09:19 PM by SlideRule.)
Post: #1




(TI59) Advances in Archaeological Method & Theory vol4
An extract from Advances in Archaeological Method & Theory, volume 4, Archaeoastronomy, Academic Press, 1981, 464 pages
Archaeoastronomy INTRODUCTION Definitions and Orientation … SUMMARY: THE FUTURE OF ARCHAEOASTRONOMY … (pages 5766) APPENDIX A AZIMUTH FINDER. COMPUTER PROGRAM FOR TI59 CALCULATOR Program Description Azimuth Finder Program is for use with data gathered with a surveyor's transit. The program will return the correct azimuth and altitude of the sun for any given time or place as well as the azimuth of any alignment. It solves the following equations: HA = (GMT  12)* 15  LONG  EOT*15 ALT  Arcsin (Sin(LAT)*Sin(DEC) + Cos(LAT)*Cos(DEC)*Cos(HA)) Azimuth of Sun = Arcsin (Sin(HA)*Cos(DEC)  Cos(ALT)) Azimuth of Sun = Arccos ((Sin(DEC)  Sin(LAT)*Sin(ALT)) 5 (Cos(LAT)*Cos(ALT)) … TABLE A.1 Azimuth Finder Program User Instructions … TABLE A.2 Azimuth Finder Program Coding Form … TABLE A.3 Correction Factors for Azimuth Finder Program (Load into Data Registers 1020) … APPENDIX B AZIMUTHDECLINATION PREDICTOR COMPUTER PROGRAM FOR TI59 CALCULATOR Program Description AzimuthDeclination Predictor Program is used for predicting the position of the stars, sun, and moon. The program solves these equations: Azimuth = Acos((Sin(DEC)  Sin(ALT)Sin(LAT)) + (Cos(ALT)Cos(LAT)) Declination  Arcsin(Cos(ALT)Cos(LAT)Cos(AZ) + Sin(ALT)Sin(LAT)) Given DEC, LAT and ALT one can find the azimuth, or given LAT, ALT and AZ one can find the declination. Program corrects for refraction of atmosphere up to 10° above horizon. Sun and moon calculations are for first and last gleam. Parallax of moon is also included in lunar calculations. … TABLE B.1 AzimuthDeclination Predictor Program User Instructions … TABLE B.2 AzimuthDeclination Predictor Coding Form … BEST! SlideRule 

« Next Oldest  Next Newest »

User(s) browsing this thread: 1 Guest(s)