Skip to content

Commit

Permalink
set nx_global and ny_global == 0
Browse files Browse the repository at this point in the history
  • Loading branch information
jedwards4b committed May 16, 2024
1 parent aca8357 commit 3e7440b
Showing 1 changed file with 6 additions and 0 deletions.
6 changes: 6 additions & 0 deletions cicecore/drivers/nuopc/cmeps/ice_comp_nuopc.F90
Original file line number Diff line number Diff line change
Expand Up @@ -907,6 +907,12 @@ subroutine InitializeRealize(gcomp, importState, exportState, clock, rc)
! *******************
! *** RETURN HERE ***
! *******************
call State_SetScalar(dble(0), flds_scalar_index_nx, exportState, &
flds_scalar_name, flds_scalar_num, rc)
if (ChkErr(rc,__LINE__,u_FILE_u)) return
call State_SetScalar(dble(0), flds_scalar_index_ny, exportState, &
flds_scalar_name, flds_scalar_num, rc)
if (ChkErr(rc,__LINE__,u_FILE_u)) return
RETURN
else if(single_column) then
write(nu_diag,'(a,3(f10.5,2x))')' (ice_comp_nuopc) single column mode lon/lat/frac is ',&
Expand Down

0 comments on commit 3e7440b

Please sign in to comment.