Changeset 2643 in Sophya for trunk/SophyaExt/XephemAstroLib/plshadow.c

Timestamp:

Jan 17, 2005, 11:13:08 AM (21 years ago)

Author:

cmv

Message:

update pour version 3.6.3 Xephem cmv 17/01/04

File:

• trunk/SophyaExt/XephemAstroLib/plshadow.c (modified) (3 diffs)

trunk/SophyaExt/XephemAstroLib/plshadow.c

@@ -6 +6 @@
 #define sqr(x)          ((x)*(x))
 
-/* given a time, a planet, the sun, the planet's eq pole position and a
+/* given a planet, the sun, the planet's eq pole position and a
  * position of a satellite (as eq x=+e y=+s z=front in planet radii) find x,y
  * position of shadow.
@@ -12 +12 @@
  */
 int
-plshadow (Now *np, Obj *op, Obj *sop, double polera, double poledec, double x,
-double y, double z, double *sxp, double *syp)
+plshadow (Obj *op, Obj *sop, double polera, double poledec, double x,
+double y, double z, float *sxp, float *syp)
 {
         /* equatorial to ecliptic sky-plane rotation */
@@ -48 +48 @@
 
 /* For RCS Only -- Do Not Edit */
-static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: plshadow.c,v $ $Date: 2004-06-15 16:54:12 $ $Revision: 1.1 $ $Name: not supported by cvs2svn $"};
+static char *rcsid[2] = {(char *)rcsid, "@(#) $RCSfile: plshadow.c,v $ $Date: 2005-01-17 10:13:06 $ $Revision: 1.2 $ $Name: not supported by cvs2svn $"};