mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-19 10:32:02 -05:00
Corrected typo in moon2.f
Added "localhost" address to plrs_subs_win.c. Use static variables in Astro.F. git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/map65@1004 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
parent
453d3c11c8
commit
2f2c111860
2
astro.F
2
astro.F
@ -19,7 +19,7 @@ C NB: may want to smooth the Tsky map to 10 degrees or so.
|
|||||||
equivalence (n1sky,nsky)
|
equivalence (n1sky,nsky)
|
||||||
data first/.true./
|
data first/.true./
|
||||||
data rad/57.2957795/
|
data rad/57.2957795/
|
||||||
save first
|
save
|
||||||
|
|
||||||
if(first) then
|
if(first) then
|
||||||
do i=80,1,-1
|
do i=80,1,-1
|
||||||
|
2
map65.py
2
map65.py
@ -1,4 +1,4 @@
|
|||||||
#--------------------------------------------------------------------- MAP65
|
#---------------------------------------------------------------------- MAP65
|
||||||
# $Date$ $Revision$
|
# $Date$ $Revision$
|
||||||
#
|
#
|
||||||
from Tkinter import *
|
from Tkinter import *
|
||||||
|
2
moon2.f
2
moon2.f
@ -58,7 +58,7 @@ C Orbital elements for Moon:
|
|||||||
e = 0.054900d0
|
e = 0.054900d0
|
||||||
MM = mod(115.3654d0 + 13.0649929509d0 * d + 360000.d0,360.d0)
|
MM = mod(115.3654d0 + 13.0649929509d0 * d + 360000.d0,360.d0)
|
||||||
|
|
||||||
EE = MM + e*rad*sin(MM/rad) * (1.d0 + e*cos(M/rad))
|
EE = MM + e*rad*sin(MM/rad) * (1.d0 + e*cos(MM/rad))
|
||||||
EE = EE - (EE - e*rad*sin(EE/rad)-MM) / (1.d0 - e*cos(EE/rad))
|
EE = EE - (EE - e*rad*sin(EE/rad)-MM) / (1.d0 - e*cos(EE/rad))
|
||||||
EE = EE - (EE - e*rad*sin(EE/rad)-MM) / (1.d0 - e*cos(EE/rad))
|
EE = EE - (EE - e*rad*sin(EE/rad)-MM) / (1.d0 - e*cos(EE/rad))
|
||||||
|
|
||||||
|
@ -4,7 +4,8 @@
|
|||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
|
|
||||||
#define HELLO_PORT 50004
|
#define HELLO_PORT 50004
|
||||||
#define HELLO_GROUP "239.255.0.0"
|
//#define HELLO_GROUP "239.255.0.0"
|
||||||
|
#define HELLO_GROUP "127.0.0.1"
|
||||||
|
|
||||||
struct sockaddr_in addr;
|
struct sockaddr_in addr;
|
||||||
int fd;
|
int fd;
|
||||||
|
Loading…
Reference in New Issue
Block a user