Removed call to diag_manager_end()

- diag_manager_end() is meant to be called from the driver level.
  In the case of coupled and ice-ocean models, the driver is the
  coupler.
- This will allow 3440869 to be
  applied, "Add diag_mediator_end() to close open files.".

SIS_diag_mediator.F90

@@ -35,7 +35,7 @@ module SIS_diag_mediator
 use MOM_string_functions, only : lowercase
 use MOM_time_manager, only : time_type
 
-use diag_manager_mod, only : diag_manager_init, diag_manager_end
+use diag_manager_mod, only : diag_manager_init
 use diag_manager_mod, only : send_data, diag_axis_init
 use diag_manager_mod, only : register_diag_field_fms=>register_diag_field
 use diag_manager_mod, only : register_static_field_fms=>register_static_field
@@ -809,8 +809,6 @@ end subroutine SIS_diag_mediator_close_registration
 subroutine SIS_diag_mediator_end(time)
   type(time_type), intent(in) :: time
 
-  call diag_manager_end(time)
-
   if (doc_unit > -1) then
     close(doc_unit) ; doc_unit = -3
   endif