Skip to content

Commit

Permalink
Merge 90b5e5e into c399372
Browse files Browse the repository at this point in the history
  • Loading branch information
Hallberg-NOAA authored Oct 7, 2023
2 parents c399372 + 90b5e5e commit a94f190
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/core/MOM_barotropic.F90
Original file line number Diff line number Diff line change
Expand Up @@ -3335,9 +3335,9 @@ subroutine set_up_BT_OBC(OBC, eta, SpV_avg, BT_OBC, BT_Domain, G, GV, US, CS, MS
endif
else
if (OBC%segment(OBC%segnum_v(i,J))%direction == OBC_DIRECTION_N) then
BT_OBC%dZ_v(i,J) = GV%H_to_Z*eta(i,j)
BT_OBC%dZ_v(i,J) = GV%H_to_RZ * eta(i,j) * SpV_avg(i,j)

Check warning on line 3338 in src/core/MOM_barotropic.F90

View check run for this annotation

Codecov / codecov/patch

src/core/MOM_barotropic.F90#L3338

Added line #L3338 was not covered by tests
elseif (OBC%segment(OBC%segnum_v(i,J))%direction == OBC_DIRECTION_S) then
BT_OBC%dZ_v(i,J) = GV%H_to_Z*eta(i,j+1)
BT_OBC%dZ_v(i,J) = GV%H_to_RZ * eta(i,j+1) * SpV_avg(i,j+1)

Check warning on line 3340 in src/core/MOM_barotropic.F90

View check run for this annotation

Codecov / codecov/patch

src/core/MOM_barotropic.F90#L3340

Added line #L3340 was not covered by tests
endif
endif
BT_OBC%Cg_v(i,J) = SQRT(dgeo_de_in * GV%g_prime(1) * BT_OBC%dZ_v(i,J))
Expand Down

0 comments on commit a94f190

Please sign in to comment.