From 4160256747c75788219d5e9e667f5495c898abc7 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Fri, 2 Dec 2022 11:43:25 -0500 Subject: [PATCH] Remove a temporary hardwired Doppler value. --- map65/libm65/q65b.f90 | 2 -- 1 file changed, 2 deletions(-) diff --git a/map65/libm65/q65b.f90 b/map65/libm65/q65b.f90 index 55bdd1771..7cf455edf 100644 --- a/map65/libm65/q65b.f90 +++ b/map65/libm65/q65b.f90 @@ -187,8 +187,6 @@ subroutine q65b(nutc,nqd,nxant,fcenter,nfcal,nfsample,ikhz,mousedf,ntol,xpol, & nutc00=nutc msg00=msg0(1:28) freq1_00=freq1 - - ndop00=1575 !### TEMPORARY, for Nov 12 2022 at 0500 UTC ### frx=0.001*k0*df+nkhz_center-48.0+1.0 - 0.001*nfcal fsked=frx - 0.001*ndop00/2.0 - 1.5 write(12,1120) nutc,fsked,xdt0,nsnr0,trim(msg0)