From 83c917ac571b11b20f3a67246b11fee5f4c56a14 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Mon, 21 Dec 2020 15:59:33 -0500
Subject: [PATCH] Don't allow previous values of DT, f0 to be displayed with a
 no-decode.

---
 lib/q65_decode.f90 | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/lib/q65_decode.f90 b/lib/q65_decode.f90
index 70f0d7009..7df4185f0 100644
--- a/lib/q65_decode.f90
+++ b/lib/q65_decode.f90
@@ -102,7 +102,11 @@ contains
        go to 100
     endif
     
-    if(snr1.lt.2.8) go to 100
+    if(snr1.lt.2.8) then
+       xdt1=0.
+       f1=0.
+       go to 100
+    endif
     jpk0=(xdt+1.0)*6000                      !### Is this OK?
     if(ntrperiod.le.30) jpk0=(xdt+0.5)*6000  !###
     if(jpk0.lt.0) jpk0=0