From 2e7b5e350221e75267902c615e119268fc6c391a Mon Sep 17 00:00:00 2001 From: Michael Duda Date: Fri, 16 Jun 2023 13:15:53 -0600 Subject: [PATCH 1/2] Remove debugging prints from lsm_from_mpas() in mpas_driver_lsm.F --- src/core_atmosphere/physics/mpas_atmphys_driver_lsm.F | 1 - 1 file changed, 1 deletion(-) diff --git a/src/core_atmosphere/physics/mpas_atmphys_driver_lsm.F b/src/core_atmosphere/physics/mpas_atmphys_driver_lsm.F index 8f56f88641..5231645a29 100644 --- a/src/core_atmosphere/physics/mpas_atmphys_driver_lsm.F +++ b/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) ust_urb_p(i,j) = 0._RKIND utype_urb_p(i,j) = 0 - 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)/)) enddo enddo From 980f7d3d11239ba6de5c01f6a6366a869caa7991 Mon Sep 17 00:00:00 2001 From: Michael Duda Date: Fri, 16 Jun 2023 13:16:29 -0600 Subject: [PATCH 2/2] Remove debugging prints from ysu() in module_bl_ysu.F --- src/core_atmosphere/physics/physics_wrf/module_bl_ysu.F | 3 --- 1 file changed, 3 deletions(-) diff --git a/src/core_atmosphere/physics/physics_wrf/module_bl_ysu.F b/src/core_atmosphere/physics/physics_wrf/module_bl_ysu.F index 98b249d120..d516bf1b4f 100644 --- a/src/core_atmosphere/physics/physics_wrf/module_bl_ysu.F +++ b/src/core_atmosphere/physics/physics_wrf/module_bl_ysu.F @@ -308,9 +308,6 @@ subroutine ysu(u3d,v3d,t3d,qv3d,qc3d,qi3d,p3d,p3di,pi3d, & frcurb_hv - call mpas_log_write(' ') - call mpas_log_write('--- enter subroutine ysu:') - do j = jts,jte ! ! Assign input data to local tile-sized arrays.