USE_PDAF: mpi_init call in cime_comp_mod switched off for PDAF (E…

…SCOMP#24)

Otherwise, an error for duplicate calling of `mpi_init` is thrown,
since PDAF calls `mpi_init` in its main routine `pdaf_terrsysmp.F90`.

Co-authored-by: Johannes Keller <jo.keller@fz-juelich.de>

src/eclm/cime_comp_mod.F90

@@ -610,8 +610,10 @@ subroutine cime_pre_init1(esmf_log_option)
     integer :: driver_id, oas_comp_id
     integer :: driver_comm
 
+#ifndef USE_PDAF
     call mpi_init(ierr)
     call shr_mpi_chkerr(ierr,subname//' mpi_init')
+#endif
 
 #if defined(USE_OASIS)
     call oasis_init_comp  (oas_comp_id, 'eCLM', ierr)