Merge branch 'release-2.4.0' of bitbucket.org:k1jt/wsjtx into release-2.4.0

This commit is contained in:
Bill Somerville 2021-04-21 18:01:10 +01:00
commit 46333a228d
No known key found for this signature in database
GPG Key ID: D864B06D1E81618F

View File

@ -341,8 +341,7 @@ contains
endif endif
endif endif
enddo ! icand enddo ! icand
if(iavg.eq.0 .and.navg(iseq).ge.2) go to 50 if(iavg.eq.0 .and.navg(iseq).ge.2 .and. iand(ndepth,16).ne.0) go to 50
900 return 900 return
end subroutine decode end subroutine decode