mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-22 04:11:16 -05:00
10 lines
125 B
Fortran
10 lines
125 B
Fortran
subroutine save_dxbase(dxbase0)
|
|
|
|
use packjt77
|
|
character*6 dxbase0
|
|
|
|
dxbase=dxbase0
|
|
|
|
return
|
|
end subroutine save_dxbase
|