Fix a flaw in the loop-over NB logic. There are more flaws!

This commit is contained in:
Joe Taylor 2020-09-18 15:52:33 -04:00
parent 327808a0bb
commit 2af01ebaa1

View File

@ -244,7 +244,7 @@ contains
decodes=' '
do inb=inb0,inb1,inb2
npct=inb
if(nb.lt.0) npct=inb
call blanker(iwave,nfft1,ndropmax,npct,c_bigfft)
! The big fft is done once and is used for calculating the smoothed spectrum