Skip to content

Commit

Permalink
Removed a commented out statement
Browse files Browse the repository at this point in the history
  Removed a commented out statement in propagate_int_tide.  All answers are
bitwise identical.
  • Loading branch information
Hallberg-NOAA committed Oct 1, 2019
1 parent 401ea2b commit 58cb2d4
Showing 1 changed file with 1 addition and 2 deletions.
3 changes: 1 addition & 2 deletions src/parameterizations/lateral/MOM_internal_tides.F90
Original file line number Diff line number Diff line change
Expand Up @@ -206,8 +206,7 @@ subroutine propagate_int_tide(h, tv, cn, TKE_itidal_input, vel_btTide, Nb, dt_in
if (.not.associated(CS)) return
is = G%isc ; ie = G%iec ; js = G%jsc ; je = G%jec
isd = G%isd ; ied = G%ied ; jsd = G%jsd ; jed = G%jed ; nAngle = CS%NAngle
I_rho0 = 1.0 / (GV%Rho0)
! dt_in_T = US%s_to_T*dt
I_rho0 = 1.0 / GV%Rho0
cn_subRO = 1e-100*US%m_s_to_L_T ! The hard-coded value here might need to increase.

! Set the wave speeds for the modes, using cg(n) ~ cg(1)/n.**********************
Expand Down

0 comments on commit 58cb2d4

Please sign in to comment.