module status_codes_grillix_m !! Contains a collection of GRILLIX error and warning (=status) codes implicit none public enum, bind(C) !! Enumerator defining the error and warning codes ! NOTE: Success is always zero enumerator :: GRILLIX_SUCCESS = 0 ! NOTE: Warnings need to be positive, specified in an ascending order. enumerator :: GRILLIX_WRN_GENERAL = 1 enumerator :: GRILLIX_WRN_TSTEP_NO_SUCCESS = 2 enumerator :: GRILLIX_WRN_INITIALISATION = 3 enumerator :: GRILLIX_WRN_POLYGON= 4 ! NOTE: Errors need to be negative, specified in an ascending order. enumerator :: GRILLIX_ERR_OTHER = -1 enumerator :: GRILLIX_ERR_NETCDF = -2 enumerator :: GRILLIX_ERR_NAMELIST = -3 enumerator :: GRILLIX_ERR_SOLVER2D = -4 enumerator :: GRILLIX_ERR_SOLVER3D = -5 enumerator :: GRILLIX_ERR_ALLOC = -6 enumerator :: GRILLIX_ERR_CMD = -7 enumerator :: GRILLIX_ERR_POLYGON= -8 enumerator :: GRILLIX_ERR_STATIC_DATA = -9 enumerator :: GRILLIX_ERR_TSTEP = -10 end enum end module