wrf_io_flags.h

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
7 #ifdef PROMOTE_FLOAT 
8       integer, parameter  :: WRF_FLOAT=WRF_DOUBLE
9 #else      
10       integer, parameter  :: WRF_FLOAT=WRF_REAL
11 #endif      
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