1 integer
, parameter :: WRF_FILE_NOT_OPENED
= 100
2 integer
, parameter :: WRF_FILE_OPENED_NOT_COMMITTED
= 101
3 integer
, parameter :: WRF_FILE_OPENED_FOR_WRITE
= 102
4 integer
, parameter :: WRF_FILE_OPENED_FOR_READ
= 103
5 integer
, parameter :: WRF_REAL
= 104
6 integer
, parameter :: WRF_DOUBLE
= 105
8 integer
, parameter :: WRF_FLOAT
=WRF_DOUBLE
10 integer
, parameter :: WRF_FLOAT
=WRF_REAL
12 integer
, parameter :: WRF_INTEGER
= 106
13 integer
, parameter :: WRF_LOGICAL
= 107
14 integer
, parameter :: WRF_COMPLEX
= 108
15 integer
, parameter :: WRF_DOUBLE_COMPLEX
= 109
16 integer
, parameter :: WRF_FILE_OPENED_FOR_UPDATE
= 110
17 ! This bit is
for backwards compatibility with old variants of these flags
18 ! that are still being used in io_grib1
and io_phdf5
. It should be removed
!
19 integer
, parameter :: WRF_FILE_OPENED_AND_COMMITTED
= 102
