Merge pull request #472 from jedwards4b/remove_mct_init

this call is no longer needed and removing it fully removes the mct l…
ESCOMP · Jun 25, 2024 · b2cb575 · b2cb575
2 parents e84e8a1 + 8b6aa75
commit b2cb575
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