diff --git a/components/mpas-ocean/src/Registry.xml b/components/mpas-ocean/src/Registry.xml index 31c2e8978b1d..a9900cf8467f 100644 --- a/components/mpas-ocean/src/Registry.xml +++ b/components/mpas-ocean/src/Registry.xml @@ -3958,18 +3958,18 @@ /> diff --git a/components/mpas-ocean/src/shared/mpas_ocn_diagnostics.F b/components/mpas-ocean/src/shared/mpas_ocn_diagnostics.F index 691bfe70b589..e9c0c1e44fde 100644 --- a/components/mpas-ocean/src/shared/mpas_ocn_diagnostics.F +++ b/components/mpas-ocean/src/shared/mpas_ocn_diagnostics.F @@ -399,9 +399,9 @@ subroutine ocn_diagnostic_solve(dt, statePool, forcingPool, meshPool, verticalMe ! ! extrapolate tracer values to ocean surface - ! this eventually be a modelled process - ! at present, just copy k=1 tracer values onto surface values - ! field will be updated below is better approximations are available + ! this eventually could be a modelled process + ! at present, just copy minLevelCell tracer values onto surface values + ! field will be updated below as better approximations are available !TDR need to consider how to handle tracersSurfaceValues #ifdef MPAS_OPENACC