diff --git a/assimilation_code/modules/utilities/time_manager_mod.f90 b/assimilation_code/modules/utilities/time_manager_mod.f90
index d372411a9..c74230dff 100644
--- a/assimilation_code/modules/utilities/time_manager_mod.f90
+++ b/assimilation_code/modules/utilities/time_manager_mod.f90
@@ -694,7 +694,6 @@ subroutine set_calendar_type_string(calstring)
 character(len=len(calstring))             :: str1
 character(len=max_calendar_string_length) :: cstring
 logical :: found_calendar = .false.
-integer :: i
 
 if ( .not. module_initialized ) call time_manager_init