Merge pull request #2927 from samsrabin/reduce-log-noise-2736

Reduce log noise
ESCOMP · Feb 11, 2025 · c0e9859 · c0e9859
2 parents f52463a + 559b9e3
commit c0e9859
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 10 deletions.
diff --git a/src/init_interp/initInterp.F90 b/src/init_interp/initInterp.F90
@@ -1397,7 +1397,7 @@ subroutine check_interp_non_ciso_to_ciso(ncidi)
           write(iulog,*) 'Proceeding despite missing c13 and/or c14 fields on input finidat file,'
           write(iulog,*) 'because for_testing_allow_interp_non_ciso_to_ciso is set.'
           write(iulog,*) ' '
-       else
+       else if (masterproc) then
           write(iulog,*) ' '
           write(iulog,*) 'for_testing_allow_interp_non_ciso_to_ciso is .true., but it appears to be unnecessary in this run'
           write(iulog,*) '(this is informational only - it does not indicate a problem)'

diff --git 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
@@ -79,8 +80,6 @@ subroutine CNSoilMatrixInit( )
        else
           write(iulog,*) '   no extra matrix solution tracability output'
        end if
-    else
-       write(iulog,*) 'CN Soil matrix solution is off'
     end if
   end subroutine CNSoilMatrixInit
 

diff --git a/src/utils/clmfates_interfaceMod.F90 b/src/utils/clmfates_interfaceMod.F90
@@ -1283,11 +1283,6 @@ subroutine dynamics_driv(this, nc, bounds_clump,      &
                                           this%fates(nc)%sites,  &
                                           this%fates(nc)%bc_in )
 
-      if (masterproc) then
-         write(iulog, *) 'clm: leaving fates model', bounds_clump%begg, &
-                                                  bounds_clump%endg
-      end if
-
       call t_stopf('fates_dynamics_daily_driver')
 
       return
@@ -3142,7 +3137,6 @@ subroutine Init2(this, bounds, NLFilename)
 
     call t_startf('fates_init2')
 
-    write(iulog,*) 'Init2: calling FireInit'
     call this%fates_fire_data_method%FireInit(bounds, NLFilename)
 
     call t_stopf('fates_init2')