Review feedback

CICE-Consortium · May 6, 2024 · 56304b7 · 56304b7
1 parent 8e2df00
commit 56304b7
Showing 1 changed file with 2 additions and 3 deletions.
diff --git a/cicecore/cicedyn/infrastructure/ice_domain.F90 b/cicecore/cicedyn/infrastructure/ice_domain.F90
@@ -227,11 +227,11 @@ subroutine init_domain_blocks
 #ifdef CESMCOUPLED
    nprocs = get_num_procs()
 #else
-   if (nprocs == -1) then
+   if (nprocs < 0) then
       nprocs = get_num_procs()
    else if (nprocs /= get_num_procs()) then
       write(nu_diag,*) subname,' ERROR: nprocs, get_num_procs = ',nprocs,get_num_procs()
-      call abort_ice(subname//' ERROR: Input nprocs not same as system request', file=__FILE__, line=__LINE__)
+      call abort_ice(subname//' ERROR: Input nprocs not same as system (e.g MPI) request', file=__FILE__, line=__LINE__)
    endif
 #endif
 
@@ -247,7 +247,6 @@ subroutine init_domain_blocks
       endif
    endif
 
-
 !----------------------------------------------------------------------
 !
 !  perform some basic checks on domain