(50g) Astronomy Programs - Printable Version +- HP Forums (https://www.hpmuseum.org/forum) +-- Forum: HP Software Libraries (/forum-10.html) +--- Forum: General Software Library (/forum-13.html) +--- Thread: (50g) Astronomy Programs (/thread-1478.html) |
(50g) Astronomy Programs - Eddie W. Shore - 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/ |