From 2044b736dad8444272d3dd5f89cf63716ccbf073 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Mon, 20 May 2019 12:46:36 -0400
Subject: [PATCH] Fix a bug in calculation of S/N in JT4 mode.

---
 lib/jt4_decode.f90 | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/jt4_decode.f90 b/lib/jt4_decode.f90
index da0fbda68..ff0b33c4d 100644
--- a/lib/jt4_decode.f90
+++ b/lib/jt4_decode.f90
@@ -156,7 +156,7 @@ contains
     nfreqz=nint(dfx)
     call timer('sync4   ',1)
 
-    nsnr=nint(snrx)
+    nsnr=-26
     if(sync.lt.syncmin) then
        if (associated (this%decode_callback)) then
           call this%decode_callback(nsnr,dtxz,nfreqz,.false.,csync,      &
@@ -166,6 +166,7 @@ contains
     endif
 
 ! We have achieved sync
+    nsnr=nint(snrsync - 22.9)
     decoded=blank
     deepmsg=blank
     special='     '