w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-05-24 10:22:26 -04:00
Code Issues Packages Projects Releases Wiki Activity

Correct the false-decode test in test_q65.

Browse Source
This commit is contained in:
Joe Taylor 2020-11-03 17:17:21 -05:00
parent 860b0ce21e
commit 145ddb8821
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/test_q65.f90
View File

@ -109,7 +109,7 @@ program test_q65
if(index(line,'<Decode').eq.1) cycle if(index(line,'<Decode').eq.1) cycle
read(line(11:20),*) xdt,nf read(line(11:20),*) xdt,nf
if(ntrperiod.ge.60) xdt=xdt-0.5 !### TEMPORARY ### if(ntrperiod.ge.60) xdt=xdt-0.5 !### TEMPORARY ###
decok=index(line,'K1ABC W9XYZ EN37').gt.0 decok=index(line,trim(msg)).gt.0
if((abs(xdt-dt).le.dterr .and. abs(nf-nf0).le.nferr) .or. decok) then if((abs(xdt-dt).le.dterr .and. abs(nf-nf0).le.nferr) .or. decok) then
nsync=nsync+1 nsync=nsync+1
endif endif