From 50519bc282ceac4d327f92079265f011b2c5a268 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Sun, 17 Dec 2023 14:30:34 -0500 Subject: [PATCH] Send nhsym to qmapa, it might be used later. --- qmap/libqmap/decode0.f90 | 2 +- qmap/libqmap/qmapa.f90 | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/qmap/libqmap/decode0.f90 b/qmap/libqmap/decode0.f90 index c38942527..5ae21732c 100644 --- a/qmap/libqmap/decode0.f90 +++ b/qmap/libqmap/decode0.f90 @@ -48,7 +48,7 @@ subroutine decode0(dd,ss,savg) call qmapa(dd,ss,savg,newdat,nutc,fcenter,ntol,nfa,nfb, & mousedf,mousefqso,nagain,nfshift,max_drift,offset, & nfcal,mycall,hiscall,hisgrid,nfsample,nmode,ndepth, & - datetime,ndop00,fselected,bAlso30) + datetime,ndop00,fselected,bAlso30,nhsym) call timer('qmapa ',1) return diff --git a/qmap/libqmap/qmapa.f90 b/qmap/libqmap/qmapa.f90 index 5ddef9a76..1abc37175 100644 --- a/qmap/libqmap/qmapa.f90 +++ b/qmap/libqmap/qmapa.f90 @@ -1,7 +1,7 @@ subroutine qmapa(dd,ss,savg,newdat,nutc,fcenter,ntol,nfa,nfb, & mousedf,mousefqso,nagain,nfshift,max_drift,offset,nfcal,mycall, & hiscall,hisgrid,nfsample,nBaseSubmode,ndepth,datetime,ndop00, & - fselected,bAlso30) + fselected,bAlso30,nhsym) ! Processes timf2 data received from Linrad to find and decode Q65 signals.