Skip to content

Commit 0439e66

Browse files
committed
Merge branch 'vanroekel/ocean/mixing-interface-fix' (PR #6509)
Fixes gotm interface for vertical mixing If GOTM is enabled surface friction velocity is not calculated at present. This fixes that issue by allowing KPP_input_fields to be calculated for cvmix and gotm Fixes #6507 [BFB]
2 parents 601da64 + 2546452 commit 0439e66

File tree

1 file changed

+5
-5
lines changed

1 file changed

+5
-5
lines changed

components/mpas-ocean/src/shared/mpas_ocn_tendency.F

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1243,12 +1243,12 @@ subroutine ocn_tend_tracer(tendPool, statePool, forcingPool, &
12431243
!
12441244
! Compute tracer tendency due to non-local flux computed in KPP
12451245
!
1246-
if (config_use_cvmix_kpp) then
1247-
call mpas_timer_start("non-local flux from KPP")
1248-
if (.not. config_cvmix_kpp_nonlocal_with_implicit_mix) then
1249-
call ocn_compute_KPP_input_fields(statePool, forcingPool,&
1246+
if (config_use_cvmix_kpp .or. config_use_gotm) then
1247+
call ocn_compute_KPP_input_fields(statePool, forcingPool,&
12501248
meshPool, timeLevel)
12511249

1250+
if (.not. config_cvmix_kpp_nonlocal_with_implicit_mix) then
1251+
call mpas_timer_start("non-local flux from KPP")
12521252
if (computeBudgets) then
12531253
!$omp parallel
12541254
!$omp do schedule(runtime) private(k,n)
@@ -1291,8 +1291,8 @@ subroutine ocn_tend_tracer(tendPool, statePool, forcingPool, &
12911291
!$omp end do
12921292
!$omp end parallel
12931293
endif ! compute budgets
1294+
call mpas_timer_stop("non-local flux from KPP")
12941295
end if ! not non-local with implicit mix
1295-
call mpas_timer_stop("non-local flux from KPP")
12961296
end if ! KPP
12971297

12981298
! Compute tracer tendency due to production/destruction of

0 commit comments

Comments
 (0)