Silence a compiler warning.

This commit is contained in:
Steven Franke 2020-09-10 16:11:07 -05:00
parent 2dcde590df
commit 71fdcd1119

View File

@ -210,6 +210,7 @@ contains
allocate( c2(0:nfft2-1) )
allocate( cframe(0:160*nss-1) )
jittermax=2
if(ndepth.eq.3) then
nblock=4
jittermax=2