mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-05-23 18:02:29 -04:00
Minor tweaks to sfrx.f90.
This commit is contained in:
parent
6a154b4e6f
commit
16d85d0867
@ -1,8 +1,9 @@
|
||||
program sfrx
|
||||
|
||||
! Command-line SuperFox decoder
|
||||
|
||||
use sfox_mod
|
||||
use julian
|
||||
! use popen_module, only: get_command_as_string
|
||||
|
||||
integer*2 iwave(NMAX)
|
||||
integer ihdr(11)
|
||||
@ -55,7 +56,4 @@ program sfrx
|
||||
nf=nf+1
|
||||
enddo
|
||||
|
||||
if(ncarg.gt.ifile1) write(*,1999) nf,nd,nv
|
||||
1999 format('nfiles:',i5,' ndecodes:',i5,' nverified:',i5)
|
||||
|
||||
999 end program sfrx
|
||||
|
Loading…
x
Reference in New Issue
Block a user