We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent efe2e8a commit 2e7b5e3Copy full SHA for 2e7b5e3
1 file changed
src/core_atmosphere/physics/mpas_atmphys_driver_lsm.F
@@ -478,7 +478,6 @@ subroutine lsm_from_MPAS(configs,mesh,diag_physics,sfc_input,its,ite)
478
ust_urb_p(i,j) = 0._RKIND
479
utype_urb_p(i,j) = 0
480
481
- if(swddir_p(i,j).gt.0.) call mpas_log_write('--- sw: $i $r $r',intArgs=(/i/),realArgs=(/swddir_p(i,j),swddif_p(i,j)/))
482
enddo
483
484
0 commit comments