X-Git-Url: https://git.mxchange.org/?a=blobdiff_plain;f=simgear%2Fephemeris%2Fstar.cxx;h=dee21439f12b72695429e4ded15309eb1ba3d326;hb=e4e31be7d43569a92a5d9fa7e784381b66cbd95a;hp=9f44eba65cb5179734130e1bcd154c1514b9b9f9;hpb=1e53bedca5afda25517dabcfa298f13acab0d4bd;p=simgear.git diff --git a/simgear/ephemeris/star.cxx b/simgear/ephemeris/star.cxx index 9f44eba6..dee21439 100644 --- a/simgear/ephemeris/star.cxx +++ b/simgear/ephemeris/star.cxx @@ -5,27 +5,23 @@ * September 1998. This code is based upon algorithms and data kindly * provided by Mr. Paul Schlyter. (pausch@saaf.se). * - * This program is free software; you can redistribute it and/or - * modify it under the terms of the GNU General Public License as - * published by the Free Software Foundation; either version 2 of the - * License, or (at your option) any later version. + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Library General Public + * License as published by the Free Software Foundation; either + * version 2 of the License, or (at your option) any later version. * - * This program is distributed in the hope that it will be useful, but - * WITHOUT ANY WARRANTY; without even the implied warranty of + * This library is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU - * General Public License for more details. + * Library General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software - * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. + * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * * $Id$ **************************************************************************/ - -#ifdef __BORLANDC__ -# define exception c_exception -#endif #include #include @@ -79,13 +75,13 @@ void Star::updatePosition(double mjd) double actTime, eccAnom, xv, yv, v, r, - xe, ye, ze, ecl; + xe, ecl; updateOrbElements(mjd); - actTime = fgCalcActTime(mjd); - ecl = DEG_TO_RAD * (23.4393 - 3.563E-7 * actTime); // Angle in Radians - eccAnom = fgCalcEccAnom(M, e); // Calculate the eccentric Anomaly (also known as solving Kepler's equation) + actTime = sgCalcActTime(mjd); + ecl = SGD_DEGREES_TO_RADIANS * (23.4393 - 3.563E-7 * actTime); // Angle in Radians + eccAnom = sgCalcEccAnom(M, e); // Calculate the eccentric Anomaly (also known as solving Kepler's equation) xv = cos(eccAnom) - e; yv = sqrt (1.0 - e*e) * sin(eccAnom);