parallelize some parts with openmp

git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/TOVSolver/trunk@118 1bdb13ef-5d69-4035-bb54-08abeb3aa7f1

1 files changed, 3 insertions, 5 deletions

diff --git a/src/utils.inc b/src/utils.inc
index 62bbf2a..507b617 100644
--- a/src/utils.inc
+++ b/src/utils.inc
@@ -84,9 +84,7 @@ void TOV_C_fill(CCTK_REAL *var, CCTK_INT i, CCTK_REAL r)
 
 void TOV_Copy(CCTK_INT size, CCTK_REAL *var_p, CCTK_REAL *var)
 {
-    for(; size; )
-    {
-        --size;
-        var_p[size] = var[size];
-    }
+#pragma omp parallel for
+    for(int i=0; i<size; i++)
+        var_p[i] = var[i];
 }