← Back to branch summary

~ubuntu-branches/ubuntu/hardy/wmmoonclock/hardy

« back to all changes in this revision

Viewing changes to Src/Moon.c

  • Committer: Bazaar Package Importer
  • Author(s): Martin A. Godisch
  • Date: 2005-02-11 22:17:45 UTC
  • mfrom: (2.1.1 warty)
  • Revision ID: james.westby@ubuntu.com-20050211221745-qzp731kcmhmknup1
Tags: 1.27-14
http://bugs.debian.org/294733
* Added Czech debconf translation, closes: #294733.
  Thanks to Miroslav Kure.
* Fixed POSIX compliance of debian/rules.
* Removed watch file, upstream homepage is gone.

Show diffs side-by-side

added added

removed removed

Lines of Context:
Src/Moon.c
8
8
 
9
9
double angle360();
10
10
 
 
11
void addthe(double, double, double, double, double*, double*);
 
12
void addsol(double, double, double, double, int, int, int, int);
 
13
void addn(double, int, int, int, int);
 
14
void term(int, int, int, int, double*, double*);
11
15
 
12
16
double  TwoPi = 6.283185308;
13
17
double  ARC = 206264.81;
25
29
double  S1, S2, S3, S4, S5, S6, S7;
26
30
double  DL0, DL, DD, DGAM, DLS, DF;
27
31
double  L0, L, LS, F, D;
28
 
double  ARG, FAC;
29
 
int     MAX, i, j;
 
32
double  ARG = 0.0, FAC = 0.0;
 
33
int     MAX = 0, i, j;
30
34
double  S; 
31
35
 
32
36
 
274
278
 
275
279
 
276
280
 
277
 
addsol(double COEFFL, double COEFFS, double COEFFG, double COEFFP, int P, int Q, int R, int S){
 
281
void addsol(double COEFFL, double COEFFS, double COEFFG, double COEFFP, int P, int Q, int R, int S){
278
282
 
279
283
    double      X, Y;
280
284
 
289
293
 
290
294
 
291
295
 
292
 
term(int P, int Q, int R, int S, double *X, double *Y){
 
296
void term(int P, int Q, int R, int S, double *X, double *Y){
293
297
 
294
298
    double      XX, YY;
295
299
    int         k, I[5];
307
311
 
308
312
 
309
313
 
310
 
addthe(double C1, double S1, double C2, double S2, double *C, double *S){
 
314
void addthe(double C1, double S1, double C2, double S2, double *C, double *S){
311
315
 
312
316
    *C = C1*C2 - S1*S2;
313
317
    *S = S1*C2 + C1*S2;
316
320
}
317
321
 
318
322
 
319
 
addn(double COEFFN, int P, int Q, int R, int S){
 
323
void addn(double COEFFN, int P, int Q, int R, int S){
320
324
 
321
325
    double      X, Y;
322
326
 
381
385
 *            DEC: declination (in deg; equinox of date)    
382
386
 *
383
387
 */
384
 
MiniMoon(double T, double *RA, double *DEC){
 
388
void MiniMoon(double T, double *RA, double *DEC){
385
389
 
386
390
    double      L0,L,LS,F,D,H,S,N,DL,CB,L_MOON,B_MOON,V,W,X,Y,Z,RHO;
387
391
    double      frac(), cosEPS, sinEPS, P2, ARC;
424
428
    *RA   =  ( 48.0/P2)*atan2(Y, X+RHO); 
425
429
    if (*RA<0.0) *RA += 24.0;
426
430
 
427
 
    return(0);
428
431
 
429
432
 
430
433
}