tass17.c   tass17.c 
skipping to change at line 3148 skipping to change at line 3148
/* 1 day: */ /* 1 day: */
#define DELTA_T 1.0 #define DELTA_T 1.0
static double tass17_jd0 = -1e100; static double tass17_jd0 = -1e100;
static double tass17_elem[TASS17_DIM]; static double tass17_elem[TASS17_DIM];
void CalcAllTass17Elem(const double t,double elem[TASS17_DIM]) { void CalcAllTass17Elem(const double t,double elem[TASS17_DIM]) {
int body; int body;
double lon[7]; double lon[7];
CalcLon(t,lon); CalcLon(t,lon);
for (body=0;body<8;body++) CalcTass17Elem(t,lon,body,elem+(body*6)); for (body=0;body<=7;body++) CalcTass17Elem(t,lon,body,elem+(body*6));
} }
void GetTass17Coor(double jd,int body,double *xyz) { void GetTass17Coor(double jd,int body,double *xyz) {
GetTass17OsculatingCoor(jd,jd,body,xyz); GetTass17OsculatingCoor(jd,jd,body,xyz);
} }
void GetTass17OsculatingCoor(const double jd0,const double jd, void GetTass17OsculatingCoor(const double jd0,const double jd,
const int body,double *xyz) { const int body,double *xyz) {
double x[3]; double x[3];
if (jd0 != tass17_jd0) { if (jd0 != tass17_jd0) {
 End of changes. 1 change blocks. 
1 lines changed or deleted 1 lines changed or added

This html diff was produced by rfcdiff 1.41. The latest version is available from http://tools.ietf.org/tools/rfcdiff/