Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
Tammo Jan Dijkema
dt_ctrl
Commits
cdbf167c
Commit
cdbf167c
authored
Feb 20, 2013
by
Jeroen Vreeken
Browse files
Fix build warnings in aalib
parent
e688eba0
Changes
2
Hide whitespace changes
Inline
Side-by-side
console/console/aalib/domoon.c
View file @
cdbf167c
...
...
@@ -30,7 +30,7 @@ int domoon()
{
int
i
,
prtsav
;
double
ra0
,
dec0
;
double
x
,
y
,
z
,
lon0
;
double
x
,
/*y,*/
z
,
lon0
;
double
pp
[
3
],
qq
[
3
],
pe
[
3
],
re
[
3
],
moonpp
[
3
],
moonpol
[
3
];
/* Geometric equatorial coordinates of the earth. */
...
...
@@ -134,7 +134,7 @@ if( prtflg )
if
(
x
>
45
.
0
)
{
y
=
-
(
x
-
90
.
0
)
*
z
;
//
y = -(x - 90.0)*z;
// if( y > 1.0 )
// printf( "Phase %.1f days before ", y );
// else
...
...
@@ -143,7 +143,7 @@ if( prtflg )
}
else
{
y
=
x
*
z
;
//
y = x*z;
// if( y > 1.0 )
// printf( "Phase %.1f days past ", y );
// else
...
...
console/console/aalib/nutate.c
View file @
cdbf167c
...
...
@@ -329,7 +329,7 @@ double J;
double
p
[];
{
double
ce
,
se
,
cl
,
sl
,
sino
,
f
;
double
dp
[
3
],
p1
[
3
];
double
/*
dp[3],
*/
p1
[
3
];
int
i
;
nutlo
(
J
);
/* be sure we calculated nutl and nuto */
...
...
@@ -362,8 +362,8 @@ p1[2] = sl*se*p[0]
+
(
sino
+
(
cl
-
1
.
0
)
*
se
*
coseps
)
*
p
[
1
]
+
(
cl
*
sineps
*
se
+
coseps
*
ce
)
*
p
[
2
];
for
(
i
=
0
;
i
<
3
;
i
++
)
dp
[
i
]
=
p1
[
i
]
-
p
[
i
];
//
for( i=0; i<3; i++ )
//
dp[i] = p1[i] - p[i];
//showcor( "nutation", p, dp );
for
(
i
=
0
;
i
<
3
;
i
++
)
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment