Merge branch 'master' of gitlab.mpcdf.mpg.de:elpa/elpa

29d84527 · Andreas Marek · 339b4fca · 0eacaed7 · 29d84527
Commit 29d84527 authored Feb 18, 2016 by Andreas Marek
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 0 deletions

src/elpa1_compute.F90 src/elpa1_compute.F90 +2 -0

No files found.
--- a/src/elpa1_compute.F90
+++ b/src/elpa1_compute.F90
@@ -2538,6 +2538,8 @@ module ELPA1_compute
 #ifdef WITH_OPENMP
      integer(kind=ik)              :: max_threads, my_thread
      integer(kind=ik)              :: omp_get_max_threads, omp_get_thread_num
+      integer(kind=ik)              :: istat
+      character(200)                :: errorMessage

      max_threads = omp_get_max_threads()