this call is no longer needed and removing it fully removes the mct l…

…ibrary from cesm
ESCOMP · Jun 24, 2024 · 8b6aa75 · 8b6aa75
1 parent f960f3e
commit 8b6aa75
Showing 1 changed file with 0 additions and 4 deletions.
diff --git a/cesm/driver/esm.F90 b/cesm/driver/esm.F90
@@ -796,7 +796,6 @@ subroutine esm_init_pelayout(driver, maxthreads, rc)
 #ifndef NO_MPI2
     use mpi          , only : MPI_COMM_NULL, mpi_comm_size
 #endif
-    use m_MCTWorld   , only : mct_world_init => init
 
 #ifdef MED_PRESENT
     use med_internalstate_mod , only : med_id
@@ -1164,9 +1163,6 @@ subroutine esm_init_pelayout(driver, maxthreads, rc)
 
     enddo
 
-    call mct_world_init(componentCount+1, GLOBAL_COMM, comms, comps)
-
-
     deallocate(petlist, comms, comps, comp_iamin, comp_comm_iam)
 
   end subroutine esm_init_pelayout