diff options
author | rhaas <rhaas@e296648e-0e4f-0410-bd07-d597d9acff87> | 2012-10-13 01:25:24 +0000 |
---|---|---|
committer | rhaas <rhaas@e296648e-0e4f-0410-bd07-d597d9acff87> | 2012-10-13 01:25:24 +0000 |
commit | 55e95e4557524afce0caf9fd5a015c9c8fdf051b (patch) | |
tree | 100432f323d8c4b31d22f11faf3672c2e4f9d6ee /src/metrics/Alvi.F77 | |
parent | bdf875745ae407bf4f8ffbfdccfaf803e0e64101 (diff) |
use OmpenMP threadprivate variable attribute for SAVE variables in pointwise
routines
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/Exact/trunk@278 e296648e-0e4f-0410-bd07-d597d9acff87
Diffstat (limited to 'src/metrics/Alvi.F77')
-rw-r--r-- | src/metrics/Alvi.F77 | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/metrics/Alvi.F77 b/src/metrics/Alvi.F77 index cda692f..046602a 100644 --- a/src/metrics/Alvi.F77 +++ b/src/metrics/Alvi.F77 @@ -34,6 +34,7 @@ c static locals CCTK_REAL m1,m2,b data firstcall /.true./ save firstcall, m1,m2,b +c$omp threadprivate (firstcall, m1,m2,b) c locals CCTK_REAL rin1,rin2,rout,x1,x2, r1, r2, r3, results(10) |