var deg2rad=0.0174532925199433;var pi=3.141592653589793;var pio2=1.5707963267948966;var x3pio2=4.71238898038469;var twopi=6.283185307179586;var xmnpda=1440;var ae=1;var xke=0.0743669161;var tothrd=0.6666666666666666;var km2mi=0.621371;var e6a=0.000001;var xj2=0.0010826158;var xj3=-0.00000253881;var xj4=-0.00000165597;var xkmper=6378.137;var xmnpda=1440;var ck2=0.0005413079;var ck4=6.209887e-7;var f=0.00335281066474748;var ge=398600.8;var s=1.012229;var qoms2t=1.880279e-9;var secday=86400;var omega_E=1.00273790934;var omega_ER=6.3003879;var zns=0.0000119459;var c1ss=0.0000029864797;var zes=0.01675;var znl=0.00015835218;var c1l=4.7968065e-7;var zel=0.0549;var zcosis=0.91744867;var zsinis=0.39785416;var zsings=-0.98088458;var zcosgs=0.1945905;var zcoshs=1;var zsinhs=0;var q22=0.0000017891679;var q31=0.0000021460748;var q33=2.2123015e-7;var g22=5.7686396;var g32=0.95240898;var g44=1.8014998;var g52=1.050833;var g54=4.4108898;var root22=0.0000017891679;var root32=3.7393792e-7;var root44=7.3636953e-9;var root52=1.1428639e-7;var root54=2.1765803e-9;var thdt=0.0043752691;var rho=0.15696615;var mfactor=0.00007292115;var sr=696000;var AU=149597870.691;function Sign(_1){if(_1>0){return 1;}else{if(_1<0){return -1;}else{return 0;}}}function Sqr(_2){return (_2*_2);}function Cube(_3){return (_3*_3*_3);}function Radians(_4){return (_4*deg2rad);}function Degrees(_5){return (_5/deg2rad);}function ArcSin(_6){if(fabs(_6)>=1){return (Sign(_6)*pio2);}else{return (atan(_6/Math.sqrt(1-_6*_6)));}}function ArcCos(_7){return (pio2-ArcSin(_7));}function FMod2p(x){var i;var _a;_a=x;i=Math.round((_a/twopi)-0.5);_a-=i*twopi;if(_a<0){_a+=twopi;}return _a;}function AcTan(_b,_c){if(_c==0){if(_b>0){return (pio2);}else{return (x3pio2);}}else{if(_c>0){if(_b>0){return (Math.atan(_b/_c));}else{return (twopi+Math.atan(_b/_c));}}else{return (Math.PI+Math.atan(_b/_c));}}}