Index: trunk/WRF.COMMON/WRFV3/external/RSL_LITE/module_dm.F
===================================================================
--- trunk/WRF.COMMON/WRFV3/external/RSL_LITE/module_dm.F	(revision 2762)
+++ trunk/WRF.COMMON/WRFV3/external/RSL_LITE/module_dm.F	(revision 2774)
@@ -23,5 +23,5 @@
 
    INTERFACE wrf_dm_maxval
-#ifdef PROMOTE_FLOAT
+#if (RWORDSIZE == 8)
      MODULE PROCEDURE wrf_dm_maxval_real , wrf_dm_maxval_integer
 #else
@@ -31,5 +31,5 @@
 
    INTERFACE wrf_dm_minval                       ! gopal's doing
-#ifdef PROMOTE_FLOAT
+#if (RWORDSIZE == 8)
      MODULE PROCEDURE wrf_dm_minval_real , wrf_dm_minval_integer
 #else
@@ -1082,5 +1082,5 @@
    END SUBROUTINE wrf_dm_maxval_real
 
-#ifndef PROMOTE_FLOAT
+#if (RWORDSIZE == 4)
    SUBROUTINE wrf_dm_maxval_doubleprecision ( val, idex, jdex )
       IMPLICIT NONE
@@ -1173,5 +1173,5 @@
    END SUBROUTINE wrf_dm_minval_real
 
-#ifndef PROMOTE_FLOAT
+#if (RWORDSIZE == 4)
    SUBROUTINE wrf_dm_minval_doubleprecision ( val, idex, jdex )
       IMPLICIT NONE
Index: trunk/WRF.COMMON/WRFV3/external/io_grib_share/wrf_io_flags.h
===================================================================
--- trunk/WRF.COMMON/WRFV3/external/io_grib_share/wrf_io_flags.h	(revision 2762)
+++ trunk/WRF.COMMON/WRFV3/external/io_grib_share/wrf_io_flags.h	(revision 2774)
@@ -5,5 +5,5 @@
       integer, parameter  :: WRF_REAL                             = 104
       integer, parameter  :: WRF_DOUBLE                           = 105
-#ifdef PROMOTE_FLOAT 
+#if (RWORDSIZE == 8)
       integer, parameter  :: WRF_FLOAT=WRF_DOUBLE
 #else