aboutsummaryrefslogtreecommitdiff
path: root/src/metrics/Gowdy_wave.F77
diff options
context:
space:
mode:
Diffstat (limited to 'src/metrics/Gowdy_wave.F77')
-rw-r--r--src/metrics/Gowdy_wave.F771
1 files changed, 1 insertions, 0 deletions
diff --git a/src/metrics/Gowdy_wave.F77 b/src/metrics/Gowdy_wave.F77
index cfb3354..efdb938 100644
--- a/src/metrics/Gowdy_wave.F77
+++ b/src/metrics/Gowdy_wave.F77
@@ -44,6 +44,7 @@ c local static variables
CCTK_REAL Bessel_J0, Bessel_J1
data firstcall /.true./
save firstcall, amp, PI, twoPI, Bessel_J0, Bessel_J1
+c$omp threadprivate (firstcall, amp, PI, twoPI, Bessel_J0, Bessel_J1)
c local variables
CCTK_REAL Bessel_J0_t, Bessel_J1_t