w4kek
/
WSJT-X
mirror of https://github.com/saitohirga/WSJT-X.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Fix a problem with access to apsym0() array.

This commit is contained in:
Joe Taylor 2020-12-30 15:40:06 -05:00
parent 70e9df38cb
commit e07ba410c2
2 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lib/q65_decode.f90
View File

@ -55,7 +55,6 @@ contains
integer*2 iwave(NMAX) !Raw data
real, allocatable :: dd(:) !Raw data
integer dat4(13) !Decoded message as 12 6-bit integers
integer apsym0(58),aph10(10)
integer apmask1(78),apsymbols1(78)
integer dgen(13)
integer codewords(63,206)

1
lib/qra/q65/q65.f90
View File

@ -6,6 +6,7 @@ module q65
integer iutc(MAXAVE)
integer iseq(MAXAVE)
integer listutc(10)
integer apsym0(58),aph10(10)
integer apmask(13),apsymbols(13)
integer navg
real f0save(MAXAVE)