w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-25 21:58:38 -05:00
Code Issues Packages Projects Releases Wiki Activity

Code cleanup.

Browse Source
This commit is contained in:
Joe Taylor 2021-02-19 09:47:30 -05:00
parent 990dcccffe
commit 7192f53e68
1 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -636,8 +636,6 @@ subroutine q65_snr(dat4,dtdec,f0dec,mode_q65,snr2)
integer itone(85) integer itone(85)
real, allocatable :: spec(:) real, allocatable :: spec(:)
! write(70) mode_q65,df,dtdec,f0dec,iz0,jz0,s1raw
allocate(spec(iz0)) allocate(spec(iz0))
call q65_enc(dat4,codeword) call q65_enc(dat4,codeword)
i=1 i=1