05-30-2014, 07:54 PM
HP 50G: Astronomy Programs
5/21/2014
Escape Velocity:
Input:
2: mass in pounds
1: distance in miles
Output:
1: escape velocity in mi/sec
Program ESCVEL
<< 5280 * INV * 2 * 1.0690441604E-9 * √ 5280 / >>
Period Around the Sun:
Input:
2: mass of orbiting object in pounds
1: distance from sun in miles
Output:
1: period of orbit in years
Program PERSUN
<< 5280 * 3 ^ SWAP 4.384E30 +
1.0690441604E-9 * / √ 2 * π *
→NUM 31556925.9747 / >>
Distance of Stars using Parallax
Input:
1: angle in arc seconds
Output:
1: distance to star in light years
Program PARALLAX
<< PUSH DEG 3600 / TAN
63239.7263452 * INV POP >>
Newton's Law of Gravity Solver
F = force (ft^3)/(lb s^2)
M1 = mass of object 1 (lb)
M2 = mass of object 2 (lb)
R = distance between objects (ft)
Program GRAVITY
<< {'F' 'M1' 'M2' 'R'} PURGE F M1 M2 1.0690466104E-9
* * R SQ / = STEQ 30 MENU >>
Source (where I did my research): Astronomy 801: Planets, Stars, and the Universe - Penn State University
https://www.e-education.psu.edu/astro801/
5/21/2014
Escape Velocity:
Input:
2: mass in pounds
1: distance in miles
Output:
1: escape velocity in mi/sec
Program ESCVEL
<< 5280 * INV * 2 * 1.0690441604E-9 * √ 5280 / >>
Period Around the Sun:
Input:
2: mass of orbiting object in pounds
1: distance from sun in miles
Output:
1: period of orbit in years
Program PERSUN
<< 5280 * 3 ^ SWAP 4.384E30 +
1.0690441604E-9 * / √ 2 * π *
→NUM 31556925.9747 / >>
Distance of Stars using Parallax
Input:
1: angle in arc seconds
Output:
1: distance to star in light years
Program PARALLAX
<< PUSH DEG 3600 / TAN
63239.7263452 * INV POP >>
Newton's Law of Gravity Solver
F = force (ft^3)/(lb s^2)
M1 = mass of object 1 (lb)
M2 = mass of object 2 (lb)
R = distance between objects (ft)
Program GRAVITY
<< {'F' 'M1' 'M2' 'R'} PURGE F M1 M2 1.0690466104E-9
* * R SQ / = STEQ 30 MENU >>
Source (where I did my research): Astronomy 801: Planets, Stars, and the Universe - Penn State University
https://www.e-education.psu.edu/astro801/