Skip to content

Commit 6f6f3fb

Browse files
Merge branch 'ocean/fix_Jacobian_from_TS' into hotfix_v3.2
This merge introduces a fix for an issue where an invalid config option was reference in the model, causing a valid config option to be ignored. * ocean/fix_Jacobian_from_TS: Update common_level_eos to Jacobian_from_TS.
2 parents 5b02f69 + e812114 commit 6f6f3fb

File tree

3 files changed

+3
-3
lines changed

3 files changed

+3
-3
lines changed

src/core_ocean/mode_forward/mpas_ocn_mpas_core.F

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -933,7 +933,7 @@ subroutine mpas_core_setup_packages(configPool, packagePool, ierr)!{{{
933933
frazilIceActive = .true.
934934
end if
935935

936-
if (config_pressure_gradient_type.eq.'common_level_eos') then
936+
if (config_pressure_gradient_type.eq.'Jacobian_from_TS') then
937937
inSituEOSActive = .true.
938938
end if
939939

src/core_ocean/shared/mpas_ocn_diagnostics.F

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -471,7 +471,7 @@ subroutine ocn_diagnostic_solve(dt, statePool, forcingPool, meshPool, diagnostic
471471
call mpas_timer_start("equation of state", .false., diagEOSTimer)
472472

473473
! compute in-place density
474-
if (config_pressure_gradient_type.eq.'common_level_eos') then
474+
if (config_pressure_gradient_type.eq.'Jacobian_from_TS') then
475475
! only compute EOS derivatives if needed.
476476
call mpas_pool_get_array(diagnosticsPool, 'inSituThermalExpansionCoeff',inSituThermalExpansionCoeff)
477477
call mpas_pool_get_array(diagnosticsPool, 'inSituSalineContractionCoeff', inSituSalineContractionCoeff)

src/core_ocean/shared/mpas_ocn_tendency.F

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -265,7 +265,7 @@ subroutine ocn_tend_vel(tendPool, statePool, forcingPool, diagnosticsPool, meshP
265265
! velocity tendency: pressure gradient
266266
!
267267
call mpas_timer_start("pressure grad", .false., velPgradTimer)
268-
if (config_pressure_gradient_type.eq.'common_level_eos') then
268+
if (config_pressure_gradient_type.eq.'Jacobian_from_TS') then
269269
! only pass EOS derivatives if needed.
270270
call mpas_pool_get_array(diagnosticsPool, 'inSituThermalExpansionCoeff',inSituThermalExpansionCoeff)
271271
call mpas_pool_get_array(diagnosticsPool, 'inSituSalineContractionCoeff', inSituSalineContractionCoeff)

0 commit comments

Comments
 (0)