mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-26 14:18:38 -05:00
9 lines
134 B
Fortran
9 lines
134 B
Fortran
|
subroutine parse77(msg,i3,n3)
|
||
|
|
|
||
|
|
use packjt77
|
||
|
|
character msg*37,c77*77
|
||
|
|
call pack77(msg,i3,n3,c77)
|
||
|
|
|
||
|
|
return
|
||
|
|
end subroutine parse77
|