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/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 b2bb00289d..7e346f4908 100644
--- a/phys/module_surface_driver.F
+++ b/phys/module_surface_driver.F
@@ -3103,8 +3103,8 @@ SUBROUTINE surface_driver(                                         &
 	 
 	 ENDIF 
 
-  if(iopt_run.eq.5) then
-    if(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
@@ -3119,8 +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
+  ENDIF
 
          call seaice_noah( SEAICE_ALBEDO_OPT, SEAICE_ALBEDO_DEFAULT, SEAICE_THICKNESS_OPT, &
               &            SEAICE_THICKNESS_DEFAULT, SEAICE_SNOWDEPTH_OPT,             &