remove temporary write statement

glemieux · Oct 19, 2023 · 6953572 · 6953572
1 parent 732d3b9
commit 6953572
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/src/utils/clmfates_interfaceMod.F90 b/src/utils/clmfates_interfaceMod.F90
@@ -2677,7 +2677,6 @@ subroutine WrapGlobalSeedDispersal(this,is_restart_flag)
 
    ! Check to see if we are not in a threaded region.  Fail the run if this returns true.
 #ifdef _OPENMP
-   write(iulog,*) 'omp check: ', omp_in_parallel()
    if (omp_in_parallel()) then
       call endrun(msg='clmfates interface error: MPI routine called within threaded region'//&
            errMsg(sourcefile, __LINE__))