w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-09-27 07:36:38 -04:00
Code Issues Packages Projects Releases Wiki Activity

Don't smooth at all if nsmo = 1: i.e., set it to nsmo=0.

Browse Source
This commit is contained in:
Joe Taylor 2021-01-22 15:16:21 -05:00
parent 0715eb6396
commit b64520591f
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -256,6 +256,7 @@ subroutine q65_symspec(iwave,nmax,iz,jz,s1)
s1(i,j)=real(c0(i))**2 + aimag(c0(i))**2 s1(i,j)=real(c0(i))**2 + aimag(c0(i))**2
enddo enddo
! For large Doppler spreads, should we smooth the spectra here? ! For large Doppler spreads, should we smooth the spectra here?
if(nsmo.le.1) nsmo=0
do i=1,nsmo do i=1,nsmo
call smo121(s1(1:iz,j),iz) call smo121(s1(1:iz,j),iz)
enddo enddo