9 lines
417 B
Fortran
Executable File
9 lines
417 B
Fortran
Executable File
MODULE toolspar_kind
|
|
IMPLICIT NONE
|
|
INTEGER, PUBLIC, PARAMETER :: & !: Floating point section
|
|
sp = SELECTED_REAL_KIND( 6, 37), & !: single precision (real 4)
|
|
dp = SELECTED_REAL_KIND(12,307), & !: double precision (real 8)
|
|
wp = SELECTED_REAL_KIND(12,307), & !: double precision (real 8)
|
|
ik = SELECTED_INT_KIND(6) !: integer precision
|
|
END MODULE toolspar_kind
|