fvcom_tools 1.14.0
Loading...
Searching...
No Matches
kinds.f90
Go to the documentation of this file.
1
4
11module kinds
12 implicit none
13 private
14!
15! for name string
16 integer, parameter, public :: len_sta_name = 8
17
18! Integer type definitions below
19
20! Integer types
21 integer, parameter, public :: i_kind = 4
22 integer, parameter, public :: i_short = 2
23 integer, parameter, public :: i_byte = 1
24! Real types
25 integer, parameter, public :: r_single = 4
26 integer, parameter, public :: r_kind = 8
27
28!
29 real(r_single),parameter,public :: rmissing=-99999.0
30 real(i_kind),parameter,public :: imissing=-99999
31 real(r_kind),parameter,public :: drmissing=-99999.0
32
33end module kinds
Module to hold specification kinds for variable declaration.
Definition kinds.f90:11
integer, parameter, public r_single
specification kind for single precision (4-byte) real variable.
Definition kinds.f90:25
integer, parameter, public i_kind
generic specification kind for default integer.
Definition kinds.f90:21
integer, parameter, public len_sta_name
Name length.
Definition kinds.f90:16
integer, parameter, public i_byte
generic specification kind for default byte.
Definition kinds.f90:23
integer, parameter, public r_kind
generic specification kind for default floating point
Definition kinds.f90:26
integer, parameter, public i_short
generic specification kind for default short.
Definition kinds.f90:22
real(i_kind), parameter, public imissing
Fill value for integer missing data.
Definition kinds.f90:30
real(r_kind), parameter, public drmissing
Fill value for double real missing data.
Definition kinds.f90:31
real(r_single), parameter, public rmissing
Fill value for single real missing data.
Definition kinds.f90:29