From d9fb22de59555ffee1485a830967168f884c145f Mon Sep 17 00:00:00 2001 From: Sam Rabin Date: Wed, 8 Jan 2025 10:42:29 -0700 Subject: [PATCH] "CN Soil matrix solution is on" msg now only on masterproc. --- src/soilbiogeochem/CNSoilMatrixMod.F90 | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/soilbiogeochem/CNSoilMatrixMod.F90 b/src/soilbiogeochem/CNSoilMatrixMod.F90 index be3ab866a2..e2b4ff2292 100644 --- a/src/soilbiogeochem/CNSoilMatrixMod.F90 +++ b/src/soilbiogeochem/CNSoilMatrixMod.F90 @@ -18,6 +18,7 @@ module CNSoilMatrixMod use shr_log_mod , only : errMsg => shr_log_errMsg use decompMod , only : bounds_type use abortutils , only : endrun + use spmdMod , only : masterproc use clm_time_manager , only : get_step_size, is_end_curr_month,get_curr_date,update_DA_nstep use clm_time_manager , only : is_first_restart_step,is_beg_curr_year,is_end_curr_year,is_first_step_of_this_run_segment use clm_varpar , only : ndecomp_pools, nlevdecomp, ndecomp_pools_vr !number of biogeochemically active soil layers @@ -64,7 +65,7 @@ subroutine CNSoilMatrixInit( ) ! !LOCAL VARIABLES: !----------------------------------------------------------------------- - if ( use_soil_matrixcn ) then + if ( use_soil_matrixcn .and. masterproc) then write(iulog,*) 'CN Soil matrix solution is on' write(iulog,*) '*****************************' if ( spinup_matrixcn ) then