w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-06-05 16:12:30 -04:00
Code Issues Packages Projects Releases Wiki Activity

Zero the ss() array at start of sequence in symspec().

Browse Source
This commit is contained in:
Joe Taylor 2024-01-19 11:10:23 -05:00
parent b3d8750949
commit 55286b05a9
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
qmap/libqmap/symspec.f90
View File

@ -43,6 +43,7 @@ subroutine symspec(k,ndiskdat,nb,nbslider,nfsample, &
if(k.lt.k0) then if(k.lt.k0) then
ts=1.d0 - hsym ts=1.d0 - hsym
ss=0.
savg=0. savg=0.
ihsym=0 ihsym=0
k1=0 k1=0