mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-03-23 20:48:33 -04:00
17 lines
354 B
Fortran
17 lines
354 B
Fortran
module types
|
|
use, intrinsic :: iso_fortran_env
|
|
implicit none
|
|
|
|
! use the Fortran 2008 intrinsic constants to define real kinds
|
|
integer, parameter :: sp = REAL32
|
|
integer, parameter :: dp = REAL64
|
|
integer, parameter :: qp = REAL128
|
|
|
|
type q3list
|
|
character*6 call
|
|
character*4 grid
|
|
integer nsec
|
|
end type q3list
|
|
|
|
end module types
|