Remove some diagnostic write statements. Still needs cleanup!

This commit is contained in:
Joe Taylor 2023-01-16 18:51:57 -05:00
parent 6f02c86d9a
commit af04310f93
4 changed files with 8 additions and 13 deletions

View File

@ -26,7 +26,7 @@ void getfile(QString fname, bool xpol, int dbDgrd)
n = fread(id,2,npts,fp);
Q_UNUSED (n);
int j=0;
qDebug() << "aaa" << datcom_.fcenter;
// qDebug() << "aaa" << datcom_.fcenter;
if(dbDgrd<0) {
for(int i=0; i<npts; i+=2) {

View File

@ -37,16 +37,11 @@ subroutine q65c(itimer)
datetime(18:20)=':00'
npatience=1
newdat=1 !Always on ??
if(nagain.eq.1) then
! nfa=127
! nfb=128
newdat=1
! nagain=0
endif
write(*,3001) 'aa',newdat,nagain,nfa,nfb,ntol,fselected
3001 format(a2,5i6,f10.3)
write(*,3001) 'bb',newdat,nagain,nfa,nfb,ntol,fselected
! write(*,3001) 'aa',newdat,nagain,nfa,nfb,ntol,fselected
!3001 format(a2,5i6,f10.3)
! write(*,3001) 'bb',newdat,nagain,nfa,nfb,ntol,fselected
call timer('decode0 ',0)
call decode0(dd,ss,savg)

View File

@ -56,10 +56,10 @@ subroutine q65wa(dd,ss,savg,newdat,nutc,fcenter,ntol,nfa,nfb, &
do icand=1,ncand !Attempt to decode each candidate
f0=cand(icand)%f
! if(f0-mfa.lt.0.0 .or. f0-mfb.gt.0.0) cycle
print*,'cc',nagain,ntol,fselected,f0+nkhz_center-48.0
! print*,'cc',nagain,ntol,fselected,f0+nkhz_center-48.0
if(nagain.eq.1 .and. abs(f0+nkhz_center-48.0 - fselected).gt.0.001*ntol) cycle
nagain2=0
print*,'dd',nagain,ntol,fselected,f0+nkhz_center-48.0
! print*,'dd',nagain,ntol,fselected,f0+nkhz_center-48.0
freq=cand(icand)%f+nkhz_center-48.0-1.27046
ikhz=nint(freq)
idec=-1

View File

@ -885,7 +885,7 @@ void MainWindow::decode() //decode()
datcom_.nfa=nfa;
datcom_.nfb=nfb;
qDebug() << "bbb" << datcom_.fcenter << datcom_.nfa << datcom_.nfb << datcom_.fselected;
// qDebug() << "bbb" << datcom_.fcenter << datcom_.nfa << datcom_.nfb << datcom_.fselected;
datcom_.nfcal=m_fCal;
datcom_.nfshift=nfshift;
datcom_.mcall3=0;