Skip to content

Commit 656701b

Browse files
ldfowler58mgduda
authored andcommitted
* In ./src/core_atmosphere/physics/mpas_atmphys_driver_gwdo.F, replaced z = z_p with
z = zmid_p to use the height defined at the middle of layers instead of the height defined at the interface between layers in the call to subroutine gwdo (bug fix).
1 parent b41850f commit 656701b

1 file changed

Lines changed: 1 addition & 1 deletion

File tree

src/core_atmosphere/physics/mpas_atmphys_driver_gwdo.F

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -311,7 +311,7 @@ subroutine driver_gwdo(itimestep,configs,mesh,sfc_input,diag_physics,tend_physic
311311
call gwdo ( &
312312
p3d = pres_hydd_p , p3di = pres2_hydd_p , pi3d = pi_p , &
313313
u3d = u_p , v3d = v_p , t3d = t_p , &
314-
qv3d = qv_p , z = z_p , rublten = rublten_p , &
314+
qv3d = qv_p , z = zmid_p , rublten = rublten_p , &
315315
rvblten = rvblten_p , dtaux3d = dtaux3d_p , dtauy3d = dtauy3d_p , &
316316
dusfcg = dusfcg_p , dvsfcg = dvsfcg_p , kpbl2d = kpbl_p , &
317317
itimestep = itimestep , dt = dt_pbl , dx = dx_p , &

0 commit comments

Comments
 (0)