Changeset 3654 in Sophya for trunk/SophyaExt


Ignore:
Timestamp:
Jul 16, 2009, 12:34:39 PM (16 years ago)
Author:
cmv
Message:

mise a niveau Xephem 3.7.4, cmv 16/07/2009

Location:
trunk/SophyaExt/XephemAstroLib
Files:
64 edited

Legend:

Unmodified
Added
Removed

  • trunk/SophyaExt/XephemAstroLib/aa_hadec.c

    r3477 r3654  
    7575
    7676/* For RCS Only -- Do Not Edit */
    77 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: aa_hadec.c,v $ $Date: 2008-03-25 17:45:08 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     77static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: aa_hadec.c,v $ $Date: 2009-07-16 10:34:35 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/aberration.c

    r3477 r3654  
    159159
    160160/* For RCS Only -- Do Not Edit */
    161 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: aberration.c,v $ $Date: 2008-03-25 17:45:08 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     161static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: aberration.c,v $ $Date: 2009-07-16 10:34:35 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/actan.c

    r3477 r3654  
    11#include <math.h>
    22
    3 /* @(#) $Id: actan.c,v 1.7 2008-03-25 17:45:08 cmv Exp $ */
     3/* @(#) $Id: actan.c,v 1.8 2009-07-16 10:34:35 cmv Exp $ */
    44
    55/* commonly in math.h, but not in strict ANSI C */
    … …  
    6565
    6666/* For RCS Only -- Do Not Edit */
    67 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: actan.c,v $ $Date: 2008-03-25 17:45:08 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     67static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: actan.c,v $ $Date: 2009-07-16 10:34:35 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/airmass.c

    r3477 r3654  
    2424
    2525/* For RCS Only -- Do Not Edit */
    26 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: airmass.c,v $ $Date: 2008-03-25 17:45:09 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     26static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: airmass.c,v $ $Date: 2009-07-16 10:34:35 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/anomaly.c

    r3477 r3654  
    6161
    6262/* For RCS Only -- Do Not Edit */
    63 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: anomaly.c,v $ $Date: 2008-03-25 17:45:09 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     63static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: anomaly.c,v $ $Date: 2009-07-16 10:34:35 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/ap_as.c

    r3477 r3654  
    6666
    6767/* For RCS Only -- Do Not Edit */
    68 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: ap_as.c,v $ $Date: 2008-03-25 17:45:09 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     68static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: ap_as.c,v $ $Date: 2009-07-16 10:34:35 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/astro.h

    r3477 r3654  
    808808
    809809/* For RCS Only -- Do Not Edit
    810  * @(#) $RCSfile: astro.h,v $ $Date: 2008-03-25 17:45:09 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $
     810 * @(#) $RCSfile: astro.h,v $ $Date: 2009-07-16 10:34:35 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $
    811811 */

  • trunk/SophyaExt/XephemAstroLib/atlas.c

    r3477 r3654  
    194194
    195195/* For RCS Only -- Do Not Edit */
    196 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: atlas.c,v $ $Date: 2008-03-25 17:45:09 $ $Revision: 1.5 $ $Name: not supported by cvs2svn $"};
     196static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: atlas.c,v $ $Date: 2009-07-16 10:34:36 $ $Revision: 1.6 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/auxil.c

    r3477 r3654  
    4040
    4141/* For RCS Only -- Do Not Edit */
    42 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: auxil.c,v $ $Date: 2008-03-25 17:45:10 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     42static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: auxil.c,v $ $Date: 2009-07-16 10:34:36 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/bdl.c

    r3477 r3654  
    115115        char *bp;
    116116
    117         if (buf && width != (int)fread (buf, 1, width, fp)) {
    118             if (ferror(fp)) strcpy (ynot, "IO error");
    119             else if (feof(fp)) strcpy (ynot, "unexpected EOF");
    120             else strcpy (ynot, "short file");
     117        if (width > sizeof(buf)-1) {
     118            sprintf (ynot, "BDL Field width %d > %d", width, (int)sizeof(buf));
     119            return (-1);
     120        }
     121        if (width != (int)fread (buf, 1, width, fp)) {
     122            if (ferror(fp)) strcpy (ynot, "BDL IO error");
     123            else if (feof(fp)) strcpy (ynot, "BDL unexpected EOF");
     124            else strcpy (ynot, "BDL short file");
    121125            return (-1);
    122126        }
    … …  
    232236
    233237/* For RCS Only -- Do Not Edit */
    234 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: bdl.c,v $ $Date: 2008-03-25 17:45:11 $ $Revision: 1.5 $ $Name: not supported by cvs2svn $"};
     238static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: bdl.c,v $ $Date: 2009-07-16 10:34:36 $ $Revision: 1.6 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/bdl.h

    r3477 r3654  
    33
    44/* For RCS Only -- Do Not Edit
    5  * @(#) $RCSfile: bdl.h,v $ $Date: 2008-03-25 17:45:11 $ $Revision: 1.5 $ $Name: not supported by cvs2svn $
     5 * @(#) $RCSfile: bdl.h,v $ $Date: 2009-07-16 10:34:36 $ $Revision: 1.6 $ $Name: not supported by cvs2svn $
    66 */

  • trunk/SophyaExt/XephemAstroLib/chap95.c

    r3477 r3654  
    172172
    173173/* For RCS Only -- Do Not Edit */
    174 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: chap95.c,v $ $Date: 2008-03-25 17:45:11 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     174static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: chap95.c,v $ $Date: 2009-07-16 10:34:36 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/chap95.h

    r3477 r3654  
    6565
    6666/* For RCS Only -- Do Not Edit
    67  * @(#) $RCSfile: chap95.h,v $ $Date: 2008-03-25 17:45:11 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $
     67 * @(#) $RCSfile: chap95.h,v $ $Date: 2009-07-16 10:34:36 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $
    6868 */

  • trunk/SophyaExt/XephemAstroLib/chap95_data.c

    r3477 r3654  
    781781
    782782/* For RCS Only -- Do Not Edit */
    783 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: chap95_data.c,v $ $Date: 2008-03-25 17:45:11 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     783static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: chap95_data.c,v $ $Date: 2009-07-16 10:34:36 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/circum.c

    r3477 r3654  
    861861
    862862/* For RCS Only -- Do Not Edit */
    863 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: circum.c,v $ $Date: 2008-03-25 17:45:12 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};
     863static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: circum.c,v $ $Date: 2009-07-16 10:34:36 $ $Revision: 1.9 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/comet.c

    r3477 r3654  
    8181
    8282/* For RCS Only -- Do Not Edit */
    83 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: comet.c,v $ $Date: 2008-03-25 17:45:12 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     83static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: comet.c,v $ $Date: 2009-07-16 10:34:36 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/constel.c

    r3477 r3654  
    18011801
    18021802/* For RCS Only -- Do Not Edit */
    1803 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: constel.c,v $ $Date: 2008-03-25 17:45:12 $ $Revision: 1.5 $ $Name: not supported by cvs2svn $"};
     1803static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: constel.c,v $ $Date: 2009-07-16 10:34:36 $ $Revision: 1.6 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/dbfmt.c

    r3477 r3654  
    1818#define SUBFLD          '|'     /* subfield separator */
    1919#define MAXFLDS 20              /* must be more than on any expected line */
     20#define MAXESGOOD       100     /* max earth satellite good, days */
    2021
    2122static char *enm (char *flds[MAXFLDS]);
    … …  
    183184 * we detect nonconformance as efficiently as possible.
    184185 * name ends at first '\0', '\r' or '\n'.
     186 * set startok/endok.
    185187 * if ok return 0 else return -1
    186188 */
    … …  
    244246        op->es_M = (float)tle_fld (l2, 44, 51);
    245247        op->es_orbit = (int)tle_fld (l2, 64, 68);
     248
     249        /* limit date range to decay period that changes period by 1% but
     250         * never more than MAXESGOOD.
     251         * es_n is rev/day, es_decay is (rev/day)/day
     252         */
     253        if (fabs(op->es_decay) > 0) {
     254            double dt = 0.01*op->es_n/fabs(op->es_decay);
     255            if (dt > MAXESGOOD)
     256                dt = MAXESGOOD;
     257            op->es_startok = op->es_epoch - dt;
     258            op->es_endok = op->es_epoch + dt;
     259        }
    246260
    247261        /* yes! */
    … …  
    576590        if (nf == 12)
    577591            op->es_drag = (float) atod (flds[11]);
     592
     593        /* if not already specified, limit date range to decay period that
     594         * changes period by 1% but never longer than MAXESGOOD.
     595         * es_n is rev/day, es_decay is (rev/day)/day
     596         */
     597        if (op->es_startok == 0 && op->es_endok == 0 && fabs(op->es_decay) > 0){
     598            double dt = 0.01*op->es_n/fabs(op->es_decay);
     599            if (dt > MAXESGOOD)
     600                dt = MAXESGOOD;
     601            op->es_startok = op->es_epoch - dt;
     602            op->es_endok = op->es_epoch + dt;
     603        }
    578604
    579605        return (0);
    … …  
    10001026
    10011027/* For RCS Only -- Do Not Edit */
    1002 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: dbfmt.c,v $ $Date: 2008-03-25 17:45:12 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};
     1028static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: dbfmt.c,v $ $Date: 2009-07-16 10:34:36 $ $Revision: 1.9 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/deep.c

    r3477 r3654  
    788788
    789789/* For RCS Only -- Do Not Edit */
    790 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: deep.c,v $ $Date: 2008-03-25 17:45:13 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     790static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: deep.c,v $ $Date: 2009-07-16 10:34:36 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/deepconst.h

    r3477 r3654  
    22#define _CONST_H
    33
    4 /* $Id: deepconst.h,v 1.7 2008-03-25 17:45:13 cmv Exp $ */
     4/* $Id: deepconst.h,v 1.8 2009-07-16 10:34:37 cmv Exp $ */
    55
    66
    … …  
    3131
    3232/* For RCS Only -- Do Not Edit
    33  * @(#) $RCSfile: deepconst.h,v $ $Date: 2008-03-25 17:45:13 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $
     33 * @(#) $RCSfile: deepconst.h,v $ $Date: 2009-07-16 10:34:37 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $
    3434 */

  • trunk/SophyaExt/XephemAstroLib/deltat.c

    r3477 r3654  
    8383
    8484#define TABSTART 1620.0
    85 #define TABEND 2006.0
    86 #define TABSIZ 387
     85#define TABEND 2017.0
     86#define TABSIZ 398
    8787
    8888/* Note, Stephenson and Morrison's table starts at the year 1630.
    … …  
    144144    /* 1999 USNO data 1998.0 thru 2000.0 (McBurnett) */
    145145     6297, 6347, 6383,
    146     /* 1999 extrapolation (McBurnett), 2001.0 thru 2006.0 */
    147      /* 6440, 6510, 6600, 6750, 6900, 7060 */
    148      6409, 6430, 6447, 6507, 6578, 6610 /* ECD */
    149 
    150     /* original 1997 USNO extrapolation (stern), 1998.0 thru 2004.0
    151      6296, 6420,
    152      6510, 6600, 6700, 6800, 6900   */ /* 7000, 7100, 7200, 7300, 7400, */
    153 
    154     /* Extrapolated values (USNO) (original Moshier) [1996.0 thru 2005.0]
    155      6183, 6280, 6377, 6475,
    156      6572, 6667, 6765, 6861, 6957
    157      */
     146
     147     6409, 6430, 6447, 6507, 6546, 6546, 6546,
     148
     149    /* 2008+ added 5/19/2009 from http://maia.usno.navy.mil/ser7/deltat.preds */
     150
     151    6546,
     152    6570,
     153    6650,
     154    6710,
     155    6800,
     156    6800,
     157    6900,
     158    6900,
     159    7000,
     160    7000,
    158161};
    159162
    … …  
    303306
    304307/* For RCS Only -- Do Not Edit */
    305 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: deltat.c,v $ $Date: 2008-03-25 17:45:14 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     308static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: deltat.c,v $ $Date: 2009-07-16 10:34:37 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/earthsat.c

    r3477 r3654  
    397397crazyOp (Now *np, Obj *op)
    398398{
    399         /* figure its daft if long enough to decay 1 rev/day */
    400         return (fabs(op->es_epoch - mjd) > 1/fabs(op->es_decay));
     399        /* toss if more than a year old */
     400        return (fabs(op->es_epoch - mjd) > 365);
    401401}
    402402
    … …  
    784784
    785785/* For RCS Only -- Do Not Edit */
    786 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: earthsat.c,v $ $Date: 2008-03-25 17:45:14 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};
     786static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: earthsat.c,v $ $Date: 2009-07-16 10:34:37 $ $Revision: 1.9 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/eq_ecl.c

    r3477 r3654  
    7070
    7171/* For RCS Only -- Do Not Edit */
    72 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: eq_ecl.c,v $ $Date: 2008-03-25 17:45:14 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     72static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: eq_ecl.c,v $ $Date: 2009-07-16 10:34:37 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/eq_gal.c

    r3477 r3654  
    9797
    9898/* For RCS Only -- Do Not Edit */
    99 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: eq_gal.c,v $ $Date: 2008-03-25 17:45:14 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     99static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: eq_gal.c,v $ $Date: 2009-07-16 10:34:37 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/formats.c

    r3477 r3654  
    210210
    211211/* For RCS Only -- Do Not Edit */
    212 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: formats.c,v $ $Date: 2008-03-25 17:45:14 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     212static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: formats.c,v $ $Date: 2009-07-16 10:34:37 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/helio.c

    r3477 r3654  
    4949
    5050/* For RCS Only -- Do Not Edit */
    51 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: helio.c,v $ $Date: 2008-03-25 17:45:14 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     51static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: helio.c,v $ $Date: 2009-07-16 10:34:37 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/jupmoon.c

    r3477 r3654  
    389389
    390390/* For RCS Only -- Do Not Edit */
    391 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: jupmoon.c,v $ $Date: 2008-03-25 17:45:14 $ $Revision: 1.5 $ $Name: not supported by cvs2svn $"};
     391static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: jupmoon.c,v $ $Date: 2009-07-16 10:34:37 $ $Revision: 1.6 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/libration.c

    r3477 r3654  
    22162216
    22172217/* For RCS Only -- Do Not Edit */
    2218 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: libration.c,v $ $Date: 2008-03-25 17:45:15 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     2218static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: libration.c,v $ $Date: 2009-07-16 10:34:37 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/magdecl.c

    r3477 r3654  
    379379
    380380/* For RCS Only -- Do Not Edit */
    381 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: magdecl.c,v $ $Date: 2008-03-25 17:45:15 $ $Revision: 1.6 $ $Name: not supported by cvs2svn $"};
     381static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: magdecl.c,v $ $Date: 2009-07-16 10:34:37 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/marsmoon.c

    r3477 r3654  
    263263
    264264/* For RCS Only -- Do Not Edit */
    265 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: marsmoon.c,v $ $Date: 2008-03-25 17:45:15 $ $Revision: 1.5 $ $Name: not supported by cvs2svn $"};
     265static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: marsmoon.c,v $ $Date: 2009-07-16 10:34:37 $ $Revision: 1.6 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/misc.c

    r3477 r3654  
    501501
    502502/* For RCS Only -- Do Not Edit */
    503 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: misc.c,v $ $Date: 2008-03-25 17:45:15 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};
     503static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: misc.c,v $ $Date: 2009-07-16 10:34:38 $ $Revision: 1.9 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/mjd.c

    r3477 r3654  
    254254
    255255/* For RCS Only -- Do Not Edit */
    256 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: mjd.c,v $ $Date: 2008-03-25 17:45:15 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     256static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: mjd.c,v $ $Date: 2009-07-16 10:34:38 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/moon.c

    r3477 r3654  
    34653465
    34663466/* For RCS Only -- Do Not Edit */
    3467 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: moon.c,v $ $Date: 2008-03-25 17:45:16 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};
     3467static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: moon.c,v $ $Date: 2009-07-16 10:34:38 $ $Revision: 1.9 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/mooncolong.c

    r3477 r3654  
    234234
    235235/* For RCS Only -- Do Not Edit */
    236 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: mooncolong.c,v $ $Date: 2008-03-25 17:45:16 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     236static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: mooncolong.c,v $ $Date: 2009-07-16 10:34:38 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/moonnf.c

    r3477 r3654  
    6767
    6868/* For RCS Only -- Do Not Edit */
    69 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: moonnf.c,v $ $Date: 2008-03-25 17:45:16 $ $Revision: 1.5 $ $Name: not supported by cvs2svn $"};
     69static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: moonnf.c,v $ $Date: 2009-07-16 10:34:38 $ $Revision: 1.6 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/nutation.c

    r3477 r3654  
    439439
    440440/* For RCS Only -- Do Not Edit */
    441 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: nutation.c,v $ $Date: 2008-03-25 17:45:17 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     441static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: nutation.c,v $ $Date: 2009-07-16 10:34:38 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/obliq.c

    r3477 r3654  
    2525
    2626/* For RCS Only -- Do Not Edit */
    27 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: obliq.c,v $ $Date: 2008-03-25 17:45:17 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     27static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: obliq.c,v $ $Date: 2009-07-16 10:34:38 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/parallactic.c

    r3477 r3654  
    5252
    5353/* For RCS Only -- Do Not Edit */
    54 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: parallactic.c,v $ $Date: 2008-03-25 17:45:17 $ $Revision: 1.5 $ $Name: not supported by cvs2svn $"};
     54static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: parallactic.c,v $ $Date: 2009-07-16 10:34:38 $ $Revision: 1.6 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/parallax.c

    r3477 r3654  
    4040
    4141/* For RCS Only -- Do Not Edit */
    42 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: parallax.c,v $ $Date: 2008-03-25 17:45:17 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     42static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: parallax.c,v $ $Date: 2009-07-16 10:34:38 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/plans.c

    r3477 r3654  
    225225
    226226/* For RCS Only -- Do Not Edit */
    227 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: plans.c,v $ $Date: 2008-03-25 17:45:17 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     227static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: plans.c,v $ $Date: 2009-07-16 10:34:38 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/plshadow.c

    r3477 r3654  
    4848
    4949/* For RCS Only -- Do Not Edit */
    50 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: plshadow.c,v $ $Date: 2008-03-25 17:45:17 $ $Revision: 1.5 $ $Name: not supported by cvs2svn $"};
     50static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: plshadow.c,v $ $Date: 2009-07-16 10:34:38 $ $Revision: 1.6 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/precess.c

    r3477 r3654  
    144144
    145145/* For RCS Only -- Do Not Edit */
    146 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: precess.c,v $ $Date: 2008-03-25 17:45:17 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     146static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: precess.c,v $ $Date: 2009-07-16 10:34:38 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/preferences.h

    r3477 r3654  
    2929
    3030/* For RCS Only -- Do Not Edit
    31  * @(#) $RCSfile: preferences.h,v $ $Date: 2008-03-25 17:45:18 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $
     31 * @(#) $RCSfile: preferences.h,v $ $Date: 2009-07-16 10:34:38 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $
    3232 */

  • trunk/SophyaExt/XephemAstroLib/reduce.c

    r3477 r3654  
    7676
    7777/* For RCS Only -- Do Not Edit */
    78 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: reduce.c,v $ $Date: 2008-03-25 17:45:18 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     78static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: reduce.c,v $ $Date: 2009-07-16 10:34:38 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/refract.c

    r3477 r3654  
    8989
    9090/* For RCS Only -- Do Not Edit */
    91 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: refract.c,v $ $Date: 2008-03-25 17:45:18 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};
     91static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: refract.c,v $ $Date: 2009-07-16 10:34:38 $ $Revision: 1.9 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/rings.c

    r3477 r3654  
    4343
    4444/* For RCS Only -- Do Not Edit */
    45 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: rings.c,v $ $Date: 2008-03-25 17:45:18 $ $Revision: 1.6 $ $Name: not supported by cvs2svn $"};
     45static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: rings.c,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/riset.c

    r3477 r3654  
    9898
    9999/* For RCS Only -- Do Not Edit */
    100 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: riset.c,v $ $Date: 2008-03-25 17:45:18 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     100static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: riset.c,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/riset_cir.c

    r3477 r3654  
    273273#define MAXPASSES       20              /* max iterations to try */
    274274#define FIRSTSTEP       (1.0/60.0/24.0) /* first time step, days */
    275 #define MAXSTEP         (1.0/24.0)/* max time step,days (to detect flat)*/
     275#define MAXSTEP         (12.0/24.0)/* max time step,days (to detect flat)*/
    276276
    277277        double a0 = 0;
    … …  
    383383
    384384/* For RCS Only -- Do Not Edit */
    385 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: riset_cir.c,v $ $Date: 2008-03-25 17:45:19 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     385static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: riset_cir.c,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/satlib.h

    r3477 r3654  
    22#define __SATLIB_H
    33
    4 /* $Id: satlib.h,v 1.7 2008-03-25 17:45:19 cmv Exp $ */
     4/* $Id: satlib.h,v 1.8 2009-07-16 10:34:39 cmv Exp $ */
    55
    66typedef struct _SatElem {
    … …  
    203203
    204204/* For RCS Only -- Do Not Edit
    205  * @(#) $RCSfile: satlib.h,v $ $Date: 2008-03-25 17:45:19 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $
     205 * @(#) $RCSfile: satlib.h,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $
    206206 */

  • trunk/SophyaExt/XephemAstroLib/satmoon.c

    r3477 r3654  
    508508
    509509/* For RCS Only -- Do Not Edit */
    510 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: satmoon.c,v $ $Date: 2008-03-25 17:45:19 $ $Revision: 1.5 $ $Name: not supported by cvs2svn $"};
     510static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: satmoon.c,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.6 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/satspec.h

    r3477 r3654  
    22#define __SATSPEC_H
    33
    4 /* $Id: satspec.h,v 1.7 2008-03-25 17:45:19 cmv Exp $ */
     4/* $Id: satspec.h,v 1.8 2009-07-16 10:34:39 cmv Exp $ */
    55
    66#include "sattypes.h"
    … …  
    4040
    4141/* For RCS Only -- Do Not Edit
    42  * @(#) $RCSfile: satspec.h,v $ $Date: 2008-03-25 17:45:19 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $
     42 * @(#) $RCSfile: satspec.h,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $
    4343 */

  • trunk/SophyaExt/XephemAstroLib/sattypes.h

    r3477 r3654  
    22#define __SATTYPES_H
    33
    4 /* $Id: sattypes.h,v 1.7 2008-03-25 17:45:19 cmv Exp $ */
     4/* $Id: sattypes.h,v 1.8 2009-07-16 10:34:39 cmv Exp $ */
    55
    66typedef struct _Vec3 {
    … …  
    2525
    2626/* For RCS Only -- Do Not Edit
    27  * @(#) $RCSfile: sattypes.h,v $ $Date: 2008-03-25 17:45:19 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $
     27 * @(#) $RCSfile: sattypes.h,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $
    2828 */

  • trunk/SophyaExt/XephemAstroLib/sdp4.c

    r3477 r3654  
    428428
    429429/* For RCS Only -- Do Not Edit */
    430 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: sdp4.c,v $ $Date: 2008-03-25 17:45:19 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     430static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: sdp4.c,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/sgp4.c

    r3477 r3654  
    399399
    400400/* For RCS Only -- Do Not Edit */
    401 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: sgp4.c,v $ $Date: 2008-03-25 17:45:19 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     401static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: sgp4.c,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/sphcart.c

    r3477 r3654  
    4141
    4242/* For RCS Only -- Do Not Edit */
    43 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: sphcart.c,v $ $Date: 2008-03-25 17:45:20 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     43static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: sphcart.c,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/sun.c

    r3477 r3654  
    4242
    4343/* For RCS Only -- Do Not Edit */
    44 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: sun.c,v $ $Date: 2008-03-25 17:45:20 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     44static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: sun.c,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/thetag.c

    r3477 r3654  
    33#include "deepconst.h"
    44
    5 /* @(#) $Id: thetag.c,v 1.7 2008-03-25 17:45:20 cmv Exp $ */
     5/* @(#) $Id: thetag.c,v 1.8 2009-07-16 10:34:39 cmv Exp $ */
    66
    77
    … …  
    8888
    8989/* For RCS Only -- Do Not Edit */
    90 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: thetag.c,v $ $Date: 2008-03-25 17:45:20 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     90static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: thetag.c,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/twobody.c

    r3477 r3654  
    241241
    242242/* For RCS Only -- Do Not Edit */
    243 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: twobody.c,v $ $Date: 2008-03-25 17:45:20 $ $Revision: 1.6 $ $Name: not supported by cvs2svn $"};
     243static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: twobody.c,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/umoon.c

    r3477 r3654  
    268268
    269269/* For RCS Only -- Do Not Edit */
    270 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: umoon.c,v $ $Date: 2008-03-25 17:45:20 $ $Revision: 1.5 $ $Name: not supported by cvs2svn $"};
     270static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: umoon.c,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.6 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/utc_gst.c

    r3477 r3654  
    9393
    9494/* For RCS Only -- Do Not Edit */
    95 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: utc_gst.c,v $ $Date: 2008-03-25 17:45:20 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     95static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: utc_gst.c,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/vector.h

    r3477 r3654  
    22#define __SATVECTOR_H
    33
    4 /* $Id: vector.h,v 1.7 2008-03-25 17:45:20 cmv Exp $ */
     4/* $Id: vector.h,v 1.8 2009-07-16 10:34:39 cmv Exp $ */
    55
    66#define dotp(A,B) ((A).x*(B).x+(A).y*(B).y+(A).z*(B).z)
    … …  
    1616
    1717/* For RCS Only -- Do Not Edit
    18  * @(#) $RCSfile: vector.h,v $ $Date: 2008-03-25 17:45:20 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $
     18 * @(#) $RCSfile: vector.h,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $
    1919 */

  • trunk/SophyaExt/XephemAstroLib/vsop87.c

    r3477 r3654  
    207207
    208208/* For RCS Only -- Do Not Edit */
    209 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: vsop87.c,v $ $Date: 2008-03-25 17:45:20 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};
     209static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: vsop87.c,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.9 $ $Name: not supported by cvs2svn $"};

  • trunk/SophyaExt/XephemAstroLib/vsop87.h

    r3477 r3654  
    9090
    9191/* For RCS Only -- Do Not Edit
    92  * @(#) $RCSfile: vsop87.h,v $ $Date: 2008-03-25 17:45:21 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $
     92 * @(#) $RCSfile: vsop87.h,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $
    9393 */

  • trunk/SophyaExt/XephemAstroLib/vsop87_data.c

    r3477 r3654  
    69866986
    69876987/* For RCS Only -- Do Not Edit */
    6988 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: vsop87_data.c,v $ $Date: 2008-03-25 17:45:21 $ $Revision: 1.7 $ $Name: not supported by cvs2svn $"};
     6988static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: vsop87_data.c,v $ $Date: 2009-07-16 10:34:39 $ $Revision: 1.8 $ $Name: not supported by cvs2svn $"};
Note: See TracChangeset for help on using the changeset viewer.