$gravity JEARTH = 0.10826261D-02 , -0.25325160D-05 , -0.16185635D-05 , -0.22666923D-06 , 0.53907866D-06 , -0.35360681D-06 , -0.20155052D-06 , -0.11709050D-06 , -0.24775699D-06 , 0.23722022D-06 , -0.17814270D-06 , -0.20842886D-06 , 0.11607657D-06 , -0.17969918D-07 , 0.35553786D-07 , -0.10309720D-06 , -0.51853260D-07 , 0.13458402D-07 , -0.12757446D-06 , -0.39970223D-07 , $end $constants earth_rad = 6378.137 mu_earth = 398600.436 mu_moon = 4902.7927809104D0 mu_sun = 132712441933.00783456D0 mu_moon = 0.4902799140594720D+04 mu_sun = 0.1327124399354841D+12 sid_day = 86164.09055 $end