Skip to content

Commit

Permalink
Comment out print statement in driver/fvGFS/atmosphere.F90
Browse files Browse the repository at this point in the history
  • Loading branch information
climbfuji committed Apr 14, 2020
1 parent 34b4503 commit b301f24
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion driver/fvGFS/atmosphere.F90
Original file line number Diff line number Diff line change
Expand Up @@ -1269,7 +1269,7 @@ subroutine atmosphere_get_bottom_layer (Atm_block, DYCORE_Data)
rrg = rdgas / grav

if (first_time) then
if (mpp_pe() == mpp_root_pe()) print *, 'calculating slp kr value'
!print *, 'calculating slp kr value'
! determine 0.8 sigma reference level
sigtop = Atm(mytile)%ak(1)/pstd_mks+Atm(mytile)%bk(1)
do k = 1, npz
Expand Down

0 comments on commit b301f24

Please sign in to comment.