From 4b9d511e05fc33c998a85099ac7e504d0ea9466e Mon Sep 17 00:00:00 2001 From: Bill Sacks Date: Fri, 17 Jul 2026 10:20:55 -0600 Subject: [PATCH] Set nx and ny to 1 for single column --- src/cpl/nuopc/atm_comp_nuopc.F90 | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/src/cpl/nuopc/atm_comp_nuopc.F90 b/src/cpl/nuopc/atm_comp_nuopc.F90 index 3b19f50633..d03fe14d60 100644 --- a/src/cpl/nuopc/atm_comp_nuopc.F90 +++ b/src/cpl/nuopc/atm_comp_nuopc.F90 @@ -762,7 +762,12 @@ subroutine InitializeRealize(gcomp, importState, exportState, clock, rc) call export_fields( gcomp, model_mesh, model_clock, cam_out, rc=rc ) if (ChkErr(rc,__LINE__,u_FILE_u)) return - call get_horiz_grid_dim_d(hdim1_d, hdim2_d) + if (single_column) then + hdim1_d = 1 + hdim2_d = 1 + else + call get_horiz_grid_dim_d(hdim1_d, hdim2_d) + end if call State_SetScalar(dble(hdim1_d), flds_scalar_index_nx, exportState, & flds_scalar_name, flds_scalar_num, rc) if (ChkErr(rc,__LINE__,u_FILE_u)) return