From d6cf3dc89f8811dbc3e0505837e39ce872e59ed9 Mon Sep 17 00:00:00 2001
From: Steven Franke <s.j.franke@icloud.com>
Date: Sun, 8 Jul 2018 12:53:23 +0000
Subject: [PATCH] Screen MSK144 decodes and reject if more than 18 hard errors
 were 'corrected'. These are almost certainly undetected errors.

---
 lib/msk144decodeframe.f90 | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/msk144decodeframe.f90 b/lib/msk144decodeframe.f90
index 297987d9e..d6651e711 100644
--- a/lib/msk144decodeframe.f90
+++ b/lib/msk144decodeframe.f90
@@ -94,11 +94,11 @@ subroutine msk144decodeframe(c,softbits,msgreceived,nsuccess,recent_calls,nrecen
   llr=2.0*llr/(sigma*sigma)
   
   max_iterations=10
-!  call timer('bpdec144 ',0)
+!  call timer('bpdec128_90 ',0)
   apmask=0
   call bpdecode128_90(llr,apmask,max_iterations,decoded77,cw,nharderror,niterations)
-!  call timer('bpdec144 ',1)
-  if( nharderror .ge. 0.0 ) then
+!  call timer('bpdec128_90 ',1)
+  if( nharderror .ge. 0 .and. nharderror .lt. 18 ) then
     nsuccess=1
     write(c77,'(77i1)') decoded77
     call unpack77(c77,msgreceived)