From 4749b36ae9e8b7c5288b0d7df9052b2ca6cee00e Mon Sep 17 00:00:00 2001
From: Martin Diehl <mail@martin-diehl.net>
Date: Sun, 26 Nov 2023 12:23:37 +0100
Subject: [PATCH] simplified

---
 src/parallelization.f90 | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/src/parallelization.f90 b/src/parallelization.f90
index 153c7fc17..20ab75336 100644
--- a/src/parallelization.f90
+++ b/src/parallelization.f90
@@ -62,8 +62,9 @@ subroutine parallelization_init()
 !$ integer :: got_env, threadLevel
 !$ integer(pI32) :: OMP_NUM_THREADS
 !$ character(len=6) NumThreadsString
-
   PetscErrorCode :: err_PETSc
+
+
 #ifdef _OPENMP
   ! If openMP is enabled, check if the MPI libary supports it and initialize accordingly.
   call MPI_Init_Thread(MPI_THREAD_FUNNELED,threadLevel,err_MPI)
@@ -74,11 +75,7 @@ subroutine parallelization_init()
   if (err_MPI /= 0_MPI_INTEGER_KIND)   error stop 'MPI init failed'
 #endif
 
-#if defined(DEBUG)
-  call PetscInitialize(PETSC_NULL_CHARACTER,err_PETSc)
-#else
   call PetscInitializeNoArguments(err_PETSc)
-#endif
   CHKERRQ(err_PETSc)
 
 #if defined(DEBUG) && defined(__INTEL_COMPILER)