From 07151fb980b5acfc43ec0d0918608c5354f445a0 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Sat, 9 Apr 2016 17:11:44 +0000 Subject: [PATCH] For now, at least: always recompute hypothetical messages in hint65.f90. git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6605 ab8295b8-cf94-4d9e-aec4-7959e3be5d79 --- lib/hint65.f90 | 1 + 1 file changed, 1 insertion(+) diff --git a/lib/hint65.f90 b/lib/hint65.f90 index 86c979c21..dd30d657a 100644 --- a/lib/hint65.f90 +++ b/lib/hint65.f90 @@ -35,6 +35,7 @@ subroutine hint65(s3,mrs,mrs2,mrsym,mr2sym,mrprob,nadd,flip, & 'RO','RRR','73'/ save first,sym1,nused,msg0,sym2 + first=.true. !### For now, at least: always recompute hypothetical messages if(first) then neme=0 open(23,file=trim(data_dir)//'/CALL3.TXT',status='unknown')