From c544fa1b344298f01df9ae80aecde3be6db38137 Mon Sep 17 00:00:00 2001
From: Martin Diehl <m.diehl@mpie.de>
Date: Mon, 12 Feb 2018 15:03:35 +0100
Subject: [PATCH] typo, cause wrong finalization sequence

---
 src/spectral_interface.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/spectral_interface.f90 b/src/spectral_interface.f90
index 25421cc78..9aa4d1069 100644
--- a/src/spectral_interface.f90
+++ b/src/spectral_interface.f90
@@ -82,7 +82,7 @@ subroutine DAMASK_interface_init()
 
 !--------------------------------------------------------------------------------------------------
 ! PETSc Init
-#ifdef _OPENM
+#ifdef _OPENMP
  ! If openMP is enabled, check if the MPI libary supports it and initialize accordingly.
  ! Otherwise, the first call to PETSc will do the initialization.
  call MPI_Init_Thread(MPI_THREAD_FUNNELED,threadLevel,ierr);CHKERRQ(ierr)