From dac2414da5a24753492dd405f79c1031c72ac713 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Tue, 8 Jun 2021 11:16:26 -0400
Subject: [PATCH] Fix several comments.

---
 lib/q65_decode.f90 | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/q65_decode.f90 b/lib/q65_decode.f90
index f917d5b7d..1dfaf2e00 100644
--- a/lib/q65_decode.f90
+++ b/lib/q65_decode.f90
@@ -148,13 +148,14 @@ contains
     nused=1
     iavg=0
     call timer('q65_dec0',0)
-! Call top-level routine in q65 module: establish sync and try for a q3 decode.
+! Call top-level routine in q65 module: establish sync and try for a
+! q3 of q0 decode.
     call q65_dec0(iavg,nutc,iwave,ntrperiod,nfqso,ntol,ndepth,lclearave,  &
          emedelay,xdt,f0,snr1,width,dat4,snr2,idec)
     call timer('q65_dec0',1)
 
     if(idec.ge.0) then
-       dtdec=xdt                        !We have a list-decode result at nfqso
+       dtdec=xdt                    !We have a q3 or q0 decode at nfqso
        f0dec=f0
        go to 100
     endif