From f4d95ed6ad7d81ebbb19dbeaf6be259de2ceac17 Mon Sep 17 00:00:00 2001 From: Jon Wolfe Date: Thu, 26 Sep 2024 18:18:23 -0500 Subject: [PATCH] Add missing omp private variables for data subglacial runoff --- components/mpas-ocean/src/shared/mpas_ocn_diagnostics.F | 1 + 1 file changed, 1 insertion(+) diff --git a/components/mpas-ocean/src/shared/mpas_ocn_diagnostics.F b/components/mpas-ocean/src/shared/mpas_ocn_diagnostics.F index a2d6586a7d63..1777e1f6d1e9 100644 --- a/components/mpas-ocean/src/shared/mpas_ocn_diagnostics.F +++ b/components/mpas-ocean/src/shared/mpas_ocn_diagnostics.F @@ -3540,6 +3540,7 @@ subroutine ocn_compute_KPP_input_fields(statePool, forcingPool, & !$omp parallel !$omp do schedule(runtime) & !$omp private(kmin, fracAbsorbed, fracAbsorbedRunoff, fracAbsorbedSubglacialRunoff, & + !$omp zTop, k, zBot, transmissionCoeffTop, transmissionCoeffBot, & !$omp sumSurfaceStressSquared, i, iEdge) do iCell = 1, nCells