Parallelise loops with OpenMP.

git-svn-id: http://svn.cactuscode.org/arrangements/CactusNumerical/MoL/trunk@129 578cdeb0-5ea1-4b81-8215-5a3b8777ee0b

1 files changed, 3 insertions, 0 deletions

diff --git a/src/InitialCopy.c b/src/InitialCopy.c
index 5b72393..b421908 100644
--- a/src/InitialCopy.c
+++ b/src/InitialCopy.c
@@ -556,6 +556,7 @@ void MoL_InitRHS(CCTK_ARGUMENTS)
                                           RHSVariableIndex[var]);
     if (RHSVar)
     {
+#pragma omp parallel for
       for (index = 0; index < totalsize; index++)
       {
         RHSVar[index] = 0;
@@ -594,6 +595,7 @@ void MoL_InitRHS(CCTK_ARGUMENTS)
     {
       if (RHSVar)
       {
+#pragma omp parallel for
         for (index = 0; index < arraytotalsize; index++)
         {
           RHSVar[index] = 0;
@@ -636,6 +638,7 @@ void MoL_InitRHS(CCTK_ARGUMENTS)
                                                     RHSComplexVariableIndex[var]);
     if (RHSVar)
     {
+#pragma omp parallel for
       for (index = 0; index < totalsize; index++)
       {
         RHSVar[index] = 0;