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:
Joe Taylor 2008-09-03 15:40:52 +00:00
parent 9845df69ae
commit 8acdbb9069
4 changed files with 5 additions and 4 deletions

View File

@ -19,7 +19,7 @@ C NB: may want to smooth the Tsky map to 10 degrees or so.
equivalence (n1sky,nsky)
data first/.true./
data rad/57.2957795/
save first
save
if(first) then
do i=80,1,-1

View File

@ -1,4 +1,4 @@
#--------------------------------------------------------------------- MAP65
#---------------------------------------------------------------------- MAP65
# $Date$ $Revision$
#
from Tkinter import *

View File

@ -58,7 +58,7 @@ C Orbital elements for Moon:
e = 0.054900d0
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))

View File

@ -4,7 +4,8 @@
#include <stdio.h>
#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;
int fd;