Post Reply 
(TI-59) Advances in Archaeological Method & Theory vol-4
04-19-2024, 09:19 PM (This post was last modified: 04-19-2024 09:19 PM by SlideRule.)
Post: #1
(TI-59) Advances in Archaeological Method & Theory vol-4
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 57-66)
APPENDIX A AZIMUTH FINDER. COMPUTER PROGRAM
FOR TI-59 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 10-20)

APPENDIX B AZIMUTH-DECLINATION PREDICTOR
COMPUTER PROGRAM FOR TI-59 CALCULATOR

Program Description
   Azimuth-Declination 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
Azimuth-Declination Predictor Program User Instructions

TABLE B.2
Azimuth-Declination Predictor Coding Form


BEST!
SlideRule
Find all posts by this user
Quote this message in a reply
Post Reply 




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