Skip to content

Commit 44c5998

Browse files
authored
CAM single colum fix (#957)
This only impacts single column CAM (CESM) runs.
1 parent 4587504 commit 44c5998

File tree

1 file changed

+6
-0
lines changed

1 file changed

+6
-0
lines changed

cicecore/drivers/nuopc/cmeps/ice_comp_nuopc.F90

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -919,6 +919,12 @@ subroutine InitializeRealize(gcomp, importState, exportState, clock, rc)
919919
end if
920920
enddo
921921
deallocate(lfieldnamelist)
922+
call State_SetScalar(dble(0), flds_scalar_index_nx, exportState, &
923+
flds_scalar_name, flds_scalar_num, rc)
924+
if (ChkErr(rc,__LINE__,u_FILE_u)) return
925+
call State_SetScalar(dble(0), flds_scalar_index_ny, exportState, &
926+
flds_scalar_name, flds_scalar_num, rc)
927+
if (ChkErr(rc,__LINE__,u_FILE_u)) return
922928
! *******************
923929
! *** RETURN HERE ***
924930
! *******************

0 commit comments

Comments
 (0)