mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-11-04 05:50:31 -05:00
11 lines
259 B
Fortran
11 lines
259 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
|
||
|
|
|
||
|
|
end module types
|