From 4b6ad3857a0a15146ed2067b4ff6f0bb2a89297a Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Mon, 1 Nov 2021 14:57:52 -0400 Subject: [PATCH] Always use Deep for manual Q65 decodes (lagain==true). --- lib/q65_decode.f90 | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/lib/q65_decode.f90 b/lib/q65_decode.f90 index c0793d06f..00022c581 100644 --- a/lib/q65_decode.f90 +++ b/lib/q65_decode.f90 @@ -75,9 +75,7 @@ contains logical single_decode,lagain complex, allocatable :: c00(:) !Analytic signal, 6000 Sa/s complex, allocatable :: c0(:) !Analytic signal, 6000 Sa/s - -!w3sz added - integer stageno + integer stageno !Added by W3SZ stageno=0 ! Start by setting some parameters and allocating storage for large arrays @@ -96,7 +94,7 @@ contains nfft1=ntrperiod*12000 nfft2=ntrperiod*6000 npasses=1 - + if(lagain) ndepth=ior(ndepth,3) !Use 'Deep' for manual Q65 decodes dxcall13=hiscall ! initialize for use in packjt77 mycall13=mycall