From e5eccfe8589aef485a393cb58174faeaa8b1563e Mon Sep 17 00:00:00 2001
From: Gregor Weiss <gregor.weiss@hlrs.de>
Date: Fri, 9 Feb 2024 10:31:30 +0100
Subject: [PATCH] bug fix setting number of threads

---
 src/library/libbwc.c | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/library/libbwc.c b/src/library/libbwc.c
index 0b26b18..07b8b49 100755
--- a/src/library/libbwc.c
+++ b/src/library/libbwc.c
@@ -2593,7 +2593,10 @@ bwc_initialize_field(bwc_data *const data)
    ! run.                                                     !
    \*--------------------------------------------------------*/
    #ifdef _OPENMP
-      control->nThreads           = 1;
+   #pragma omp parallel
+   {
+      control->nThreads           = omp_get_num_threads();
+   }
    #endif
 
    /*--------------------------------------------------------*\