Skip to content

Commit

Permalink
Merge branch 'dev/gfdl' into add_dens_deriv_diag
Browse files Browse the repository at this point in the history
  • Loading branch information
marshallward authored Jul 3, 2020
2 parents 3951b70 + d44e79b commit dd8d3ab
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/parameterizations/vertical/MOM_full_convection.F90
Original file line number Diff line number Diff line change
Expand Up @@ -408,7 +408,7 @@ subroutine smoothed_dRdT_dRdS(h, tv, Kddt, dR_dT, dR_dS, G, GV, US, j, p_surf, h
else
do i=is,ie ; pres(i) = 0.0 ; enddo
endif
EOSdom(:) = EOS_domain(G%HI)
EOSdom(:) = EOS_domain(G%HI, halo)
call calculate_density_derivs(T_f(:,1), S_f(:,1), pres, dR_dT(:,1), dR_dS(:,1), tv%eqn_of_state, EOSdom)
do i=is,ie ; pres(i) = pres(i) + h(i,j,1)*(GV%H_to_RZ*GV%g_Earth) ; enddo
do K=2,nz
Expand Down

0 comments on commit dd8d3ab

Please sign in to comment.