diff --git a/README b/README
index db1e49fdd0..9ed129aeca 100644
--- a/README
+++ b/README
@@ -1,4 +1,4 @@
-WRF Model Version 4.1.4
+WRF Model Version 4.1.5
 
 http://www2.mmm.ucar.edu/wrf/users/
 
diff --git a/dyn_em/module_first_rk_step_part1.F b/dyn_em/module_first_rk_step_part1.F
index f2737e86b9..c303e7954f 100644
--- a/dyn_em/module_first_rk_step_part1.F
+++ b/dyn_em/module_first_rk_step_part1.F
@@ -437,8 +437,8 @@ SUBROUTINE first_rk_step_part1 (   grid , config_flags              &
 
 !gmm halo of wtd and riverflow for leafhydro
 #ifdef DM_PARALLEL
-  IF ( config_flags%sf_surface_physics.eq.NOAHMPSCHEME ) THEN
-       IF ( config_flags%opt_run.eq.5.and.mod(grid%itimestep,grid%STEPWTD).eq.0 )  THEN
+  IF ( ( config_flags%sf_surface_physics.EQ.NOAHMPSCHEME ) .and. ( config_flags%opt_run.EQ.5 ) ) THEN
+       IF ( mod(grid%itimestep,grid%STEPWTD).EQ.0 )  THEN
 #     include "HALO_EM_HYDRO_NOAHMP.inc"
        ENDIF
   ENDIF
diff --git a/inc/version_decl b/inc/version_decl
index 9f4b2c2b7d..a8dc975b68 100644
--- a/inc/version_decl
+++ b/inc/version_decl
@@ -1 +1 @@
-   CHARACTER (LEN=*), PARAMETER :: release_version = 'V4.1.4'
+   CHARACTER (LEN=*), PARAMETER :: release_version = 'V4.1.5'
diff --git a/phys/module_surface_driver.F b/phys/module_surface_driver.F
index 9481299df3..7e346f4908 100644
--- a/phys/module_surface_driver.F
+++ b/phys/module_surface_driver.F
@@ -3103,7 +3103,8 @@ SUBROUTINE surface_driver(                                         &
 	 
 	 ENDIF 
 
-  if(iopt_run.eq.5.and.mod(itimestep,STEPWTD).eq.0)then
+  IF ( iopt_run .EQ. 5 ) THEN
+      IF ( MOD(itimestep,STEPWTD) .EQ. 0 ) THEN ! STEPWTD always and only non-zero for iopt_run == 5
            CALL wrf_debug( 100, 'calling WTABLE' )
 
 !gmm update wtable from lateral flow and shed water to rivers
@@ -3118,7 +3119,8 @@ SUBROUTINE surface_driver(                                         &
                                   ims,ime, jms,jme, kms,kme,                             &
                                   i_start(ij),i_end(ij), j_start(ij),j_end(ij), kts,kte )
 
-  endif
+      ENDIF
+  ENDIF
 
          call seaice_noah( SEAICE_ALBEDO_OPT, SEAICE_ALBEDO_DEFAULT, SEAICE_THICKNESS_OPT, &
               &            SEAICE_THICKNESS_DEFAULT, SEAICE_SNOWDEPTH_OPT,             &