Skip to content

Commit

Permalink
Merge pull request #11 from gustavo-marques/meke_damping
Browse files Browse the repository at this point in the history
Make use_drag_rate independent of MEKE_damping
  • Loading branch information
gustavo-marques authored Aug 5, 2021
2 parents ee198de + 156d02c commit 13b01e5
Showing 1 changed file with 1 addition and 2 deletions.
3 changes: 1 addition & 2 deletions src/parameterizations/lateral/MOM_MEKE.F90
Original file line number Diff line number Diff line change
Expand Up @@ -175,8 +175,7 @@ subroutine step_forward_MEKE(MEKE, h, SN_u, SN_v, visc, dt, G, GV, US, CS, hu, h
if (.not.associated(MEKE)) call MOM_error(FATAL, &
"MOM_MEKE: MEKE must be initialized before it is used.")

if ((CS%MEKE_damping > 0.0) .or. (CS%MEKE_Cd_scale > 0.0) .or. (CS%MEKE_Cb>0.) &
.or. CS%visc_drag) then
if ((CS%MEKE_Cd_scale > 0.0) .or. (CS%MEKE_Cb>0.) .or. CS%visc_drag) then
use_drag_rate = .true.
else
use_drag_rate = .false.
Expand Down

0 comments on commit 13b01e5

Please sign in to comment.