1
0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-05-11 04:19:00 -04:00
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