(49g 50g) Theoretical Earth gravity g = g(latitude, height), WGS84, GRS80/67
|
09-21-2021, 07:04 AM
(This post was last modified: 01-12-2023 01:45 PM by Gil.)
Post: #1
|
|||
|
|||
(49g 50g) Theoretical Earth gravity g = g(latitude, height), WGS84, GRS80/67
HP49-50G
Gravity g calculation in function of two arguments: - latitude (in d.mmss), in stack level 2 - height/altitude (in m), in last stack level 1, According to equations & parameters: - International gravity 1967 - WGS 84. See, for example, for more details: https://en.m.wikipedia.org/wiki/Theoretical_gravity The code is: \<< "https://en.m.wikipedia.org/wiki/Theoretical_gravity Version 1 2 Arg . lat [in D.mmss] . alt [in m] " DROP "alt [m]" \->TAG SWAP "lat [D.mmss]" \->TAG SWAP DUP2 \-> lat alt \<< lat HMS\-> 'lat' STO DEG '9.780327*(1+.0053024*SIN(lat)^2-.0000058*SIN(lat*2)^2)-.000003086*alt' \->NUM "Int.grav 1967" \->TAG '9.7803253359*((1+1.9318526464E-3*SIN(lat)^2)/\v/(1-6.69437999014E-3*SIN(lat)^2))-(1-.00139*SIN(lat)^2)*.0000030877*alt+7.2E-13*alt^2' \->NUM "WGS 84" \->TAG \>> \>> Regards, Gil Campart |
|||
« Next Oldest | Next Newest »
|
User(s) browsing this thread: 1 Guest(s)