w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-11-03 13:30:52 -05:00
Code Issues Packages Projects Releases Wiki Activity

Forgot to add the AP-related changes to ft8_decode.f90.

Browse Source
This commit is contained in:
Steve Franke 2018-09-29 09:18:48 -05:00
parent b5cc35e430
commit 4ab4de6682
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lib/ft8_decode.f90
View File

@ -52,7 +52,7 @@ contains
character*12 mycall12,hiscall12,mycall12_0 character*12 mycall12,hiscall12,mycall12_0
character*6 hisgrid6 character*6 hisgrid6
integer*2 iwave(15*12000) integer*2 iwave(15*12000)
integer apsym1(KK),apsym2(77) integer apsym1(KK),apsym2(58)
character datetime*13,msg37*37 character datetime*13,msg37*37
! character message*22 ! character message*22
character*37 allmessages(100) character*37 allmessages(100)
@ -70,7 +70,7 @@ contains
1001 format("000000_",i6.6) 1001 format("000000_",i6.6)
call ft8apset(mycall12,hiscall12,apsym1) call ft8apset(mycall12,hiscall12,apsym1)
call ft8apset_174_91(mycall12,hiscall12,ncontest,apsym2) call ft8apset_174_91(mycall12,hiscall12,apsym2)
dd=iwave dd=iwave
ndecodes=0 ndecodes=0
allmessages=' ' allmessages=' '