Skip to content

Commit

Permalink
global_cycle - Removed checks preventing land increments for fraction…
Browse files Browse the repository at this point in the history
…al grids. (#903)

Removed two checks that caused global_cycle to report an error and exit in the 
case that both land increments were being added and fractional grids are used. There 
are no issues adding soil moisture and soil temperature increments in fractional grid mode, 
so the code can be allowed to proceed. 

Fixes #895.
  • Loading branch information
ClaraDraper-NOAA authored Feb 26, 2024
1 parent 47956a9 commit 415f616
Showing 1 changed file with 0 additions and 9 deletions.
9 changes: 0 additions & 9 deletions sorc/global_cycle.fd/cycle.f90
Original file line number Diff line number Diff line change
Expand Up @@ -454,10 +454,6 @@ SUBROUTINE SFCDRV(LUGB, IDIM,JDIM,LENSFC,LSOIL,DELTSFC, &
ENDIF

IF (DO_LNDINC) THEN
IF (FRAC_GRID) THEN
print *, 'FATAL ERROR: land increment update does not work with fractional grids.'
call MPI_ABORT(MPI_COMM_WORLD, 17, IERR)
ENDIF
! identify variables to be updated, and allocate arrays.
IF (TRIM(LND_SOI_FILE) .NE. "NULL") THEN
DO_SOI_INC = .TRUE.
Expand Down Expand Up @@ -505,11 +501,6 @@ SUBROUTINE SFCDRV(LUGB, IDIM,JDIM,LENSFC,LSOIL,DELTSFC, &
call MPI_ABORT(MPI_COMM_WORLD, 18, IERR)
ENDIF

IF (FRAC_GRID .AND. DO_SNO_INC) THEN
print *, 'FATAL ERROR: Snow increment update does not work with fractional grids.'
call MPI_ABORT(MPI_COMM_WORLD, 19, IERR)
ENDIF

IF (IS_NOAHMP .AND. DO_SNO_INC) THEN
print *, 'FATAL ERROR: Snow increment update does not work with NOAH_MP.'
call MPI_ABORT(MPI_COMM_WORLD, 29, IERR)
Expand Down

0 comments on commit 415f616

Please sign in to comment.