From 978ea0f3b57b66da22832d279020d151231fd88a Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Fri, 4 Dec 2020 12:56:23 -0500 Subject: [PATCH] Revert "forgot to uncomment fort.55 output. corrected" This reverts commit 72bc2572e6b2e706afd02b1e0edba26146ed240a. --- lib/q65_sync.f90 | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lib/q65_sync.f90 b/lib/q65_sync.f90 index 39475b4c3..710a35c5b 100644 --- a/lib/q65_sync.f90 +++ b/lib/q65_sync.f90 @@ -261,9 +261,9 @@ subroutine q65_sync(nutc,iwave,nmax,mode_q65,codewords,ncw,nsps,nfqso,ntol, & open(55,file='fort.55',status='unknown',position='append') ! Joe's dump - write(55,3055) nutc,ibw,xdt,f0,85.0*base,ccfmax,snr2,plog, & - irc,trim(decoded) -3055 format(i6,i3,6f8.2,i5,2x,a) +! write(55,3055) nutc,ibw,xdt,f0,85.0*base,ccfmax,snr2,plog, & +! irc,trim(decoded) +!3055 format(i6,i3,6f8.2,i5,2x,a) ! Nico's dump for Method 2 ! This are the ccfs of the codeword in the list at the