Merge pull request #457 from yeganer/fix-454

Fix Issue #454
tardis-sn · Feb 12, 2016 · dc73b44 · dc73b44
2 parents 5e67ebc + d2f7849
commit dc73b44
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/tardis/montecarlo/src/cmontecarlo.c b/tardis/montecarlo/src/cmontecarlo.c
@@ -829,11 +829,12 @@ montecarlo_main_loop(storage_model_t * storage, int64_t virtual_packet_flag, int
 #ifdef WITHOPENMP
   omp_set_dynamic(0);
   omp_set_num_threads(nthreads);
-  fprintf(stderr, "Running with OpenMP - %d threads\n", omp_get_num_threads());
 #pragma omp parallel
   {
     rk_state mt_state;
     rk_seed (seed + omp_get_thread_num(), &mt_state);
+#pragma omp master
+    fprintf(stderr, "Running with OpenMP - %d threads\n", omp_get_num_threads());
 
 #pragma omp for
 #else