mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-10-30 12:30:23 -04: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
|