Merge branch 'atmosphere/remove_physics_prints' into release-v8.0.0 (PR #1087)

mgduda · mgduda · commit 49e9db7b283b · 2023-06-16T20:10:19.000Z
This merge removes a couple of debugging print statements from lsm_from_mpas()
and ysu().
diff --git 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
 
diff --git 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.

Original file line number	Diff line number	Diff line change
`@@ -308,9 +308,6 @@ subroutine ysu(u3d,v3d,t3d,qv3d,qc3d,qi3d,p3d,p3di,pi3d, &`
`308`	`308`	`frcurb_hv`
`309`	`309`
`310`	`310`
`311`		`- call mpas_log_write(' ')`
`312`		`- call mpas_log_write('--- enter subroutine ysu:')`
`313`		`-`
`314`	`311`	`do j = jts,jte`
`315`	`312`	`!`
`316`	`313`	`! Assign input data to local tile-sized arrays.`