From 835542ce8c0b55de93e234f6e4d3d60c3ee14230 Mon Sep 17 00:00:00 2001 From: Darin Comeau Date: Tue, 15 Nov 2022 10:13:47 -0600 Subject: [PATCH] Add missing time level index to ssh --- components/mpas-ocean/driver/ocn_comp_mct.F | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/components/mpas-ocean/driver/ocn_comp_mct.F b/components/mpas-ocean/driver/ocn_comp_mct.F index 5a26ececf053..7c0c3f767419 100644 --- a/components/mpas-ocean/driver/ocn_comp_mct.F +++ b/components/mpas-ocean/driver/ocn_comp_mct.F @@ -2630,7 +2630,7 @@ subroutine ocn_export_mct(o2x_o, errorCode) !{{{ call mpas_pool_get_dimension(forcingPool, 'index_avgSurfaceVelocityZonal', index_avgZonalSurfaceVelocity) call mpas_pool_get_dimension(forcingPool, 'index_avgSurfaceVelocityMeridional', index_avgMeridionalSurfaceVelocity) - call mpas_pool_get_array(statePool, 'ssh', ssh) + call mpas_pool_get_array(statePool, 'ssh', ssh, 1) call mpas_pool_get_array(statePool, 'layerThickness', layerThickness, 1) call mpas_pool_get_array(forcingPool, 'landIceMask', landIceMask)