Skip to content

Commit

Permalink
Merge pull request #520 from NOAA-GFDL/user/wfcooke/grouphalopass_fix
Browse files Browse the repository at this point in the history
Bugfix to reintroduce group halo pass check removed in 282a160
  • Loading branch information
wfcooke authored Jun 14, 2017
2 parents 2b8670f + 833dd84 commit 1e8c2b4
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/core/MOM.F90
Original file line number Diff line number Diff line change
Expand Up @@ -568,7 +568,7 @@ subroutine step_MOM(fluxes, state, Time_start, time_interval, CS)
call create_group_pass(CS%pass_tau_ustar_psurf, fluxes%ustar(:,:), G%Domain)
if (ASSOCIATED(fluxes%p_surf)) &
call create_group_pass(CS%pass_tau_ustar_psurf, fluxes%p_surf(:,:), G%Domain)
if (CS%thickness_diffuse .OR. CS%mixedlayer_restrat) &
if ((CS%thickness_diffuse .and. (.not.CS%thickness_diffuse_first .or. CS%t_dyn_rel_adv == 0)) .OR. CS%mixedlayer_restrat) &
call create_group_pass(CS%pass_h, h, G%Domain) !###, halo=max(2,cont_stensil))

do_pass_Ray = .FALSE.
Expand Down

0 comments on commit 1e8c2b4

Please sign in to comment.