|
real(kind_real), parameter | gnssro_mod_transform::semi_major_axis = 6378.1370e3_kind_real |
|
real(kind_real), parameter | gnssro_mod_transform::semi_minor_axis = 6356.7523142e3_kind_real |
|
real(kind_real), parameter | gnssro_mod_transform::grav_polar = 9.8321849378_kind_real |
|
real(kind_real), parameter | gnssro_mod_transform::grav_equator = 9.7803253359_kind_real |
|
real(kind_real), parameter | gnssro_mod_transform::earth_omega = 7.292115e-5_kind_real |
|
real(kind_real), parameter | gnssro_mod_transform::grav_constant = 3.986004418e14_kind_real |
|
real(kind_real), parameter | gnssro_mod_transform::flattening = (semi_major_axis-semi_minor_axis)/semi_major_axis |
|
real(kind_real), parameter | gnssro_mod_transform::somigliana = (semi_minor_axis/semi_major_axis) * (grav_polar/grav_equator) - one |
|
real(kind_real), parameter | gnssro_mod_transform::grav_ratio = (earth_omega*earth_omega * semi_major_axis*semi_major_axis * semi_minor_axis) / grav_constant |
|
real(kind_real), parameter | gnssro_mod_transform::eccentricity = sqrt(semi_major_axis**2 - semi_minor_axis**2)/semi_major_axis |
|