don't use (){} struct constructor
This commit is contained in:
parent
372e9667df
commit
2ce287bb13
1 changed files with 28 additions and 14 deletions
|
|
@ -2,22 +2,37 @@
|
||||||
|
|
||||||
#define MAXE (.999) /* cant do hyperbolas */
|
#define MAXE (.999) /* cant do hyperbolas */
|
||||||
|
|
||||||
|
struct elem
|
||||||
|
{
|
||||||
|
double t; /* time of perihelion */
|
||||||
|
double q; /* perihelion distance */
|
||||||
|
double e; /* eccentricity */
|
||||||
|
double i; /* inclination */
|
||||||
|
double w; /* argument of perihelion */
|
||||||
|
double o; /* longitude of ascending node */
|
||||||
|
};
|
||||||
|
|
||||||
|
struct elem
|
||||||
|
mkelem(double t, double q, double e, double i, double w, double o)
|
||||||
|
{
|
||||||
|
struct elem el;
|
||||||
|
|
||||||
|
el.t = t;
|
||||||
|
el.q = q;
|
||||||
|
el.e = e;
|
||||||
|
el.i = i;
|
||||||
|
el.w = w;
|
||||||
|
el.o = o;
|
||||||
|
return el;
|
||||||
|
}
|
||||||
|
|
||||||
void
|
void
|
||||||
comet(void)
|
comet(void)
|
||||||
{
|
{
|
||||||
double pturbl, pturbb, pturbr;
|
double pturbl, pturbb, pturbr;
|
||||||
double lograd;
|
double lograd;
|
||||||
double dele, enom, vnom, nd, sl;
|
double dele, enom, vnom, nd, sl;
|
||||||
|
struct elem elem;
|
||||||
struct elem
|
|
||||||
{
|
|
||||||
double t; /* time of perihelion */
|
|
||||||
double q; /* perihelion distance */
|
|
||||||
double e; /* eccentricity */
|
|
||||||
double i; /* inclination */
|
|
||||||
double w; /* argument of perihelion */
|
|
||||||
double o; /* longitude of ascending node */
|
|
||||||
} elem;
|
|
||||||
|
|
||||||
/* elem = (struct elem)
|
/* elem = (struct elem)
|
||||||
{
|
{
|
||||||
|
|
@ -73,15 +88,14 @@ comet(void)
|
||||||
151.0510,
|
151.0510,
|
||||||
83.1909,
|
83.1909,
|
||||||
}; /*C/1999 S4 (Linear) */
|
}; /*C/1999 S4 (Linear) */
|
||||||
elem=(struct elem)
|
elem = mkelem(
|
||||||
{
|
|
||||||
etdate(2002, 3, 18.9784),
|
etdate(2002, 3, 18.9784),
|
||||||
0.5070601,
|
0.5070601,
|
||||||
0.990111,
|
0.990111,
|
||||||
28.12106,
|
28.12106,
|
||||||
34.6666,
|
34.6666,
|
||||||
93.1206,
|
93.1206
|
||||||
}; /*C/2002 C1 (Ikeya-Zhang) */
|
); /*C/2002 C1 (Ikeya-Zhang) */
|
||||||
|
|
||||||
ecc = elem.e;
|
ecc = elem.e;
|
||||||
if(ecc > MAXE)
|
if(ecc > MAXE)
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue