Minor tweaks to the 9w decoder.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6579 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2016-04-05 17:55:38 +00:00
parent fab3ddd372
commit fd1c6daf51
2 changed files with 3 additions and 1 deletions

View File

@ -42,7 +42,7 @@ subroutine decode9w(nutc,nfqso,ntol,nsubmode,ss,id2,sync,nsnr,xdt1,f0,decoded)
ccfblue=(ccfblue-base)/rms
enddo
call softsym9w(id2,npts,xdt0,f0,a(4)*df,nsubmode,xdt1,i1softsymbols)
call softsym9w(id2,npts,xdt0,f0,a(4)*df,nsubmode,xdt1-1.05,i1softsymbols)
call jt9fano(i1softsymbols,limit,nlim,decoded)
return

View File

@ -74,6 +74,8 @@ subroutine sync9w(ss,nzhsym,lag1,lag2,ia,ib,ccfred,ccfblue,ipkbest,lagpk,nadd)
lagpk=lag
endif
enddo
if(lagpk.eq.-9) lagpk=-8 !Protect the ends of ccfblue()
if(lagpk.eq.18) lagpk=17
return
end subroutine sync9w