diff --git a/Makefile.in b/Makefile.in
index 7ca9f7ccb..0fc3bb41e 100644
--- a/Makefile.in
+++ b/Makefile.in
@@ -47,7 +47,8 @@ SRCS2F90 = astro0.F90 audio_init.F90 azdist0.f90 \
 	decode1.F90 ftn_init.F90 ftn_quit.f90 wsjtgen.F90 \
 	runqqq.F90 fivehz.F90 flushqqq.F90 map65a0.f90 \
 	rfile.f90 rfile3a.f90 spec.f90 map65a.f90 display.F90 \
-	getfile.F90 getfile2.F90 recvpkt.F90 symspec.f90
+	getfile.F90 getfile2.F90 recvpkt.F90 savetf2.F90 \
+	symspec.f90
 
 SRCS2F77 = indexx.f gen65.f chkmsg.f \
 	gentone.f gencwid.f set.f db.f pctile.f sort.f ssort.f \
diff --git a/Makefile.win b/Makefile.win
index acdb7f301..570d7381f 100644
--- a/Makefile.win
+++ b/Makefile.win
@@ -18,7 +18,7 @@ SRCS2F90 = a2d.f90 astro0.f90 audio_init.f90 azdist0.f90 \
 	decode1.f90 ftn_init.f90 ftn_quit.f90 wsjtgen.f90 \
 	runqqq.f90 fivehz.f90 flushqqq.f90 map65a0.f90 \
 	rfile.f90 rfile3a.f90 spec.f90 map65a.f90 display.F90 \
-	getfile.f90 getfile2.f90 recvpkt.f90 savetf2.f90 \
+	getfile.f90 getfile2.f90 recvpkt.f90 savetf2.F90 \
 	symspec.f90
 
 SRCSCOM = datcom.f90 gcom1.f90 gcom2.f90 gcom3.f90 gcom4.f90 spcom.f90
diff --git a/map65.py b/map65.py
index d9da8889a..d96667fcb 100644
--- a/map65.py
+++ b/map65.py
@@ -1,4 +1,4 @@
-#--------------------------------------------------------------------- MAP65
+#-------------------------------------------------------------------- MAP65
 # $Date$ $Revision$
 #
 from Tkinter import *
diff --git a/savetf2.F90 b/savetf2.F90
index 46acd1df8..4207d466b 100644
--- a/savetf2.F90
+++ b/savetf2.F90
@@ -16,8 +16,8 @@ subroutine savetf2(id,nsave,nutc)
   do i=1,NPKTS
      s=0.
      do n=1,NSPP
-        s=s + float(id(1,i))**2 + float(id(2,i))**2 + float(id(3,i))**2 + &
-             float(id(4,i))**2 
+        s=s + float(int(id(1,i)))**2 + float(int(id(2,i)))**2 +     &
+	     float(int(id(3,i)))**2 + float(int(id(4,i)))**2 
      enddo
      ss(i)=fac*s
      t=t+dt