w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-22 04:11:16 -05:00
Code Issues Packages Projects Releases Wiki Activity

Disable diagnostic write.

Browse Source
This commit is contained in:
Joe Taylor 2021-05-13 08:42:00 -04:00
parent 7407dc6332
commit 43e2a95edf
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
map65/libm65/wideband2_sync.f90
View File

@ -148,10 +148,10 @@ subroutine wb2_sync(ss,savg,jz,nfa,nfb)
do i=1,4
call pctile(savg(i,ia:ib),ib-ia+1,50,savg_med(i))
enddo
do i=ia,ib
write(14,3014) 0.001*(i-1)*df3,savg(1:4,i)
3014 format(5f10.3)
enddo
! do i=ia,ib
! write(14,3014) 0.001*(i-1)*df3,savg(1:4,i)
!3014 format(5f10.3)
! enddo
lagbest=0
ipolbest=1