diff --git a/cicecore/cicedyn/infrastructure/ice_domain.F90 b/cicecore/cicedyn/infrastructure/ice_domain.F90
index 8ca03f17b..47a0f00ed 100644
--- a/cicecore/cicedyn/infrastructure/ice_domain.F90
+++ b/cicecore/cicedyn/infrastructure/ice_domain.F90
@@ -224,9 +224,9 @@ subroutine init_domain_blocks
    call broadcast_scalar(ny_global,         master_task)
 
    ! Set nprocs if not set in namelist
-   if (nprocs .eq. -1) then
+   if (nprocs == -1) then
       nprocs = get_num_procs()
-   else if (nprocs .ne. get_num_procs()) then
+   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__)
    endif