WSJT-X/pfxdump.f at c7e100defb300697922becf34573e60e7783f540 - WSJT-X - Radio Repo

w4kek/WSJT-X

mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-23 20:58:55 -05:00

Joe Taylor d303b03181 1. Replaced README.TXT and README_592.TXT with UpdateHistory.txt.

2. Improved the listing of add-on DXCC prefixes.


git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/trunk@119 ab8295b8-cf94-4d9e-aec4-7959e3be5d79

2006-01-25 21:09:04 +00:00

14 lines

340 B

Fortran

Raw Blame History

       subroutine pfxdump(fname)
       character*(*) fname
       include 'pfx.f'
       open(11,file=fname,status='unknown')
       write(11,1001) sfx
 format('Supported Suffixes:'/(11('/',a1,2x)))
       write(11,1002) pfx
 format(/'Supported Add-On DXCC Prefixes:'/(15(a5,1x)))
       close(11)
       return
       end