l1.h   l1.h 
/************************************************************************ /************************************************************************
The L1 theory of the galilean satellites The L1 theory of the galilean satellites
by Valery Lainey can be found at by Valery Lainey can be found at
ftp://ftp.imcce.fr/pub/ephem/satel/galilean/L1 ftp://ftp.imcce.fr/pub/ephem/satel/galilean/L1
I (Johannes Gajdosik) have just taken the Fortran code and data I (Johannes Gajdosik) have just taken the Fortran code and data
obtained from above and rearranged it into this piece of software. obtained from above and rearranged it into this piece of software.
I can neigther allow nor forbid the usage of the L1 theory. I can neither allow nor forbid the usage of the L1 theory.
The copyright notice below covers not the work of Valery Lainey The copyright notice below covers not the work of Valery Lainey
but just my work, that is the compilation of the L1 theory but just my work, that is the compilation of the L1 theory
into the software supplied in this file. into the software supplied in this file.
Copyright (c) 2005 Johannes Gajdosik Copyright (c) 2005 Johannes Gajdosik
Permission is hereby granted, free of charge, to any person obtaining a Permission is hereby granted, free of charge, to any person obtaining a
copy of this software and associated documentation files (the "Software"), copy of this software and associated documentation files (the "Software"),
to deal in the Software without restriction, including without limitation to deal in the Software without restriction, including without limitation
the rights to use, copy, modify, merge, publish, distribute, sublicense, the rights to use, copy, modify, merge, publish, distribute, sublicense,
skipping to change at line 64 skipping to change at line 64
#define L1_EUROPA 1 #define L1_EUROPA 1
#define L1_GANYMEDE 2 #define L1_GANYMEDE 2
#define L1_CALLISTO 3 #define L1_CALLISTO 3
void GetL1Coor(double jd,int body,double *xyz); void GetL1Coor(double jd,int body,double *xyz);
/* Return the rectangular coordinates of the given satellite /* Return the rectangular coordinates of the given satellite
and the given julian date jd expressed in dynamical time (TAI+32.184s) . and the given julian date jd expressed in dynamical time (TAI+32.184s) .
The origin of the xyz-coordinates is the center of the planet. The origin of the xyz-coordinates is the center of the planet.
The reference frame is "dynamical equinox and ecliptic J2000", The reference frame is "dynamical equinox and ecliptic J2000",
which is the reference frame in VSOP87 and VSOP87A. which is the reference frame in VSOP87 and VSOP87A.
WARNING! Due to static internal variables, this function is not reentr
ant and not parallelizable!
*/ */
void GetL1OsculatingCoor(const double jd0,const double jd, const int body,d ouble *xyz); void GetL1OsculatingCoor(const double jd0,const double jd, const int body,d ouble *xyz);
/* The oculating orbit of epoch jd0, evatuated at jd, is returned. /* The oculating orbit of epoch jd0, evaluated at jd, is returned.
*/ */
#ifdef __cplusplus #ifdef __cplusplus
} }
#endif #endif
#endif #endif
 End of changes. 3 change blocks. 
2 lines changed or deleted 5 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/