w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-03-23 12:38:53 -04:00
Code Issues Packages Projects Releases Wiki Activity

Correct for UTC wrap-around in setting Hound 'Age'. Max Age = 99.

Browse Source
This commit is contained in:
Joe Taylor 2024-07-17 16:36:47 -04:00
parent b0bd2b6310
commit 867d2fe1d9
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lib/decoder.f90
View File

@ -194,14 +194,15 @@ subroutine multimode_decoder(ss,id2,params,nfsample)
nsnrfox(j)=nsnrfox(i)
nfreqfox(j)=nfreqfox(i)
n30fox(j)=n
nage=n30-n
nage=min(99,mod(n30-n+288000,2880))
if(len(trim(g2fox(j))).eq.4) then
call azdist(mygrid,g2fox(j)//' ',0.d0,nAz,nEl,nDmiles, &
nDkm,nHotAz,nHotABetter)
else
nDkm=9999
endif
write(19,1004) c2fox(j),g2fox(j),nsnrfox(j),nfreqfox(j),nDkm,nage
write(19,1004) c2fox(j),g2fox(j),nsnrfox(j),nfreqfox(j), &
nDkm,nage
1004 format(a12,1x,a4,i5,i6,i7,i3)
endif
enddo