From 4298a0f2d3baacab8a87b8595d5b73ce52e4174b Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Tue, 15 Jan 2008 00:06:31 +0000 Subject: [PATCH] Trivial deletion in astro0.F90. git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/map65@622 ab8295b8-cf94-4d9e-aec4-7959e3be5d79 --- astro0.F90 | 2 -- map65.py | 2 +- 2 files changed, 1 insertion(+), 3 deletions(-) diff --git a/astro0.F90 b/astro0.F90 index 95be2b62e..93eafffc4 100644 --- a/astro0.F90 +++ b/astro0.F90 @@ -95,7 +95,6 @@ subroutine astro0(nyear,month,nday,uth8,nfreq,grid,cauxra,cauxdec, & imin=60*uth8 isec=3600*uth8 -!#ifdef CVF if(isec.ne.isec0 .and. ndecoding.eq.0) then ih=uth8 im=mod(imin,60) @@ -114,7 +113,6 @@ subroutine astro0(nyear,month,nday,uth8,nfreq,grid,cauxra,cauxdec, & rewind 14 isec0=isec endif -!#endif return end subroutine astro0 diff --git a/map65.py b/map65.py index 7f4fb508f..916358433 100644 --- a/map65.py +++ b/map65.py @@ -1,4 +1,4 @@ -#--------------------------------------------------------------------- MAP65 +#---------------------------------------------------------------------- MAP65 # $Date$ $Revision$ # from Tkinter import *