Skip to content

Commit 3ed740c

Browse files
Merge branch 'main' into mpas_surf_state
2 parents d1c35f9 + 62edc59 commit 3ed740c

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

models/mpas_atm/model_mod.f90

+2-2
Original file line numberDiff line numberDiff line change
@@ -4686,8 +4686,8 @@ subroutine convert_vert_distrib(state_handle, ens_size, location, obs_kind, ztyp
46864686
fdata = 0.0_r8
46874687
do i = 1, n
46884688
where (istatus == 0)
4689-
fdata(i, :) = zGridFace(k_low(i, :),c(i))*(1.0_r8 - fract(i, :)) + &
4690-
zGridFace(k_up (i, :),c(i))*fract(i, :)
4689+
fdata(i, :) = zGridCenter(k_low(i, :),c(i))*(1.0_r8 - fract(i, :)) + &
4690+
zGridCenter(k_up (i, :),c(i))*fract(i, :)
46914691
end where
46924692
enddo
46934693

0 commit comments

Comments
 (0)