Merge pull request NOAA-GFDL#335 from laurenchilutti/cherrypick291

Remove write call (NOAA-GFDL#291)
DusanJovic-NOAA · Apr 19, 2024 · 0b42dc3 · 0b42dc3
2 parents 2c2dcb5 + cd186bc
commit 0b42dc3
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/driver/GFDL/atmosphere.F90 b/driver/GFDL/atmosphere.F90
@@ -206,7 +206,6 @@ subroutine atmosphere_init (Time_init, Time, Time_step, Surf_diff, Grid_box)
    !For regional
    a_step = 0
    current_time_in_seconds = time_type_to_real( Time - Time_init )
-   if (mpp_pe() == 0) write(0,"('atmosphere_init: current_time_seconds = ',f9.1)")current_time_in_seconds
 
    allocate(pelist(mpp_npes()))
    call mpp_get_current_pelist(pelist)