diff --git a/drivers/access/CICE_RunMod.F90 b/drivers/access/CICE_RunMod.F90
index e3a44d1..61b60fb 100644
--- a/drivers/access/CICE_RunMod.F90
+++ b/drivers/access/CICE_RunMod.F90
@@ -896,7 +896,7 @@ subroutine coupling_prep
          i,j         , & ! horizontal indices
          ilo,ihi,jlo,jhi ! beginning and end of physical domain
 
-      real (kind=dbl_kind) :: & cszn
+      real (kind=dbl_kind) :: cszn ! counter for history averaging
 
       call ice_timer_start(timer_column)