Changeset 2551 in Sophya for trunk/SophyaExt/XephemAstroLib/auxil.c
- Timestamp:
- Jun 15, 2004, 6:54:12 PM (21 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SophyaExt/XephemAstroLib/auxil.c
r1719 r2551 3 3 4 4 #include <stdio.h> 5 #include <stdlib.h> 5 6 6 #if defined (__STDC__)7 #include <stdlib.h>8 #endif9 10 #include "P_.h"11 7 #include "astro.h" 12 #include "circum.h"13 8 #include "preferences.h" 14 9 10 /* default preferences */ 15 11 static int prefs[NPREFS] = { 16 12 PREF_TOPO, PREF_METRIC, PREF_MDY, PREF_UTCTZ, PREF_HIPREC, PREF_NOMSGBELL, 17 PREF_PREFILL, PREF_TIPSON, PREF_CONFIRMON, PREF_ WEEKSTART13 PREF_PREFILL, PREF_TIPSON, PREF_CONFIRMON, PREF_SUN 18 14 }; 19 15 … … 21 17 */ 22 18 int 23 pref_get(pref) 24 Preferences pref; 19 pref_get(Preferences pref) 25 20 { 26 21 return (prefs[pref]); … … 30 25 */ 31 26 int 32 pref_set (pref, new) 33 Preferences pref; 34 int new; 27 pref_set (Preferences pref, int newp) 35 28 { 36 29 int prior = pref_get(pref); 37 prefs[pref] = new ;30 prefs[pref] = newp; 38 31 return (prior); 39 32 } … … 41 34 /* given an mjd, return it modified for terrestial dynamical time */ 42 35 double 43 mm_mjed (np) 44 Now *np; 36 mm_mjed (Now *np) 45 37 { 46 38 return (mjd + deltat(mjd)/86400.0); … … 48 40 49 41 /* For RCS Only -- Do Not Edit */ 50 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: auxil.c,v $ $Date: 200 1-10-22 12:08:26 $ $Revision: 1.2$ $Name: not supported by cvs2svn $"};42 static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: auxil.c,v $ $Date: 2004-06-15 16:52:37 $ $Revision: 1.3 $ $Name: not supported by cvs2svn $"};
Note:
See TracChangeset
for help on using the changeset viewer.