comicsansg/ft8d
1
0
Fork 0
mirror of https://github.com/pavel-demin/ft8d.git synced 2024-10-31 15:57:10 -04:00
Code Issues Packages Projects Releases Wiki Activity

fix output format in ft8d.f90

Browse Source
This commit is contained in:
Pavel Demin 2018-04-01 18:05:05 +02:00
parent c18015f19d
commit 66095d9a37
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ft8d.f90
View File

@ -91,10 +91,10 @@ program ft8d
allmessages(ndecodes)=message allmessages(ndecodes)=message
allsnrs(ndecodes)=nsnr allsnrs(ndecodes)=nsnr
endif endif
write(*,1004) nutc,ncand,icand,ipass,iaptype,iappass, & write(*,1004) nutc,ipass,iaptype,iappass, &
nharderrors,dmin,hd,min(sync,999.0),nint(xsnr), & nharderrors,dmin,hd,min(sync,999.0),nint(xsnr), &
xdt,nint(f1-3000+dialfreq),message xdt,nint(f1-3000+dialfreq),message
1004 format(i6.6,2i4,3i2,i3,3f6.1,i4,f6.2,i5,2x,a22) 1004 format(i6.6,3i2,i3,3f6.1,i4,f6.2,i9,1x,a22)
endif endif
enddo enddo
enddo enddo