WSJT-X/lib/save_dxbase.f90

10 lines
125 B
Fortran
Raw Normal View History

2021-12-06 11:12:10 -05:00
subroutine save_dxbase(dxbase0)
use packjt77
character*6 dxbase0
dxbase=dxbase0
return
end subroutine save_dxbase