From 31ee7aa34e726075f6b983052206cb9b68548ac3 Mon Sep 17 00:00:00 2001 From: Jim Edwards Date: Wed, 15 Nov 2017 13:24:21 -0700 Subject: [PATCH] fix csm_build, remove debug print statement --- driver-mct/shr/seq_comm_mct.F90 | 1 - 1 file changed, 1 deletion(-) diff --git a/driver-mct/shr/seq_comm_mct.F90 b/driver-mct/shr/seq_comm_mct.F90 index ab4f9c4ebe4a..c89d9bd30cdd 100644 --- a/driver-mct/shr/seq_comm_mct.F90 +++ b/driver-mct/shr/seq_comm_mct.F90 @@ -571,7 +571,6 @@ subroutine comp_comm_init(driver_comm, comp_rootpe, comp_nthreads, comp_layout, endif call mpi_bcast(pelist, size(pelist), MPI_INTEGER, 0, DRIVER_COMM, ierr) if (present(drv_comm_id)) then - print *,__FILE__,__LINE__,drv_comm_id call seq_comm_setcomm(COMPID(n), pelist, comp_nthreads,name, drv_comm_id) else call seq_comm_setcomm(COMPID(n), pelist, comp_nthreads,name, n, num_inst_comp)