aboutsummaryrefslogtreecommitdiff
path: root/Carpet/CarpetLib/src/prolongate_3d_dgfe_rf2.cc
diff options
context:
space:
mode:
authorErik Schnetter <schnetter@gmail.com>2012-05-05 07:52:56 -0400
committerBarry Wardell <barry.wardell@gmail.com>2012-09-11 18:23:19 +0100
commit9063dd2373225196b85f61833b8caa4b1ef40c56 (patch)
treef1cb83239cf3f74ca7f5fc5962d3b1780eea4a3a /Carpet/CarpetLib/src/prolongate_3d_dgfe_rf2.cc
parent81625743e4ff136795f98b76d95ddd526469f886 (diff)
CarpetLib: Disable OpenMP collapse statements
These do not work on all systems, and we don't autoconf them yet.
Diffstat (limited to 'Carpet/CarpetLib/src/prolongate_3d_dgfe_rf2.cc')
-rw-r--r--Carpet/CarpetLib/src/prolongate_3d_dgfe_rf2.cc8
1 files changed, 4 insertions, 4 deletions
diff --git a/Carpet/CarpetLib/src/prolongate_3d_dgfe_rf2.cc b/Carpet/CarpetLib/src/prolongate_3d_dgfe_rf2.cc
index 3bcd3f10c..6d8ead898 100644
--- a/Carpet/CarpetLib/src/prolongate_3d_dgfe_rf2.cc
+++ b/Carpet/CarpetLib/src/prolongate_3d_dgfe_rf2.cc
@@ -140,7 +140,7 @@ namespace CarpetLib {
// Loop over fine region
#ifdef HRSCC_HH
ptrdiff_t const i=0;
-#pragma omp parallel for collapse(2)
+#pragma omp parallel for //collapse(2)
for (ptrdiff_t k=0; k<regkext; k+=2*(ORDER+1)) {
for (ptrdiff_t j=0; j<regjext; j+=2*(ORDER+1)) {
GLLElement<ORDER>::prolongate_2D
@@ -179,7 +179,7 @@ namespace CarpetLib {
// Loop over fine region
#ifdef HRSCC_HH
ptrdiff_t const j=0;
-#pragma omp parallel for collapse(2)
+#pragma omp parallel for //collapse(2)
for (ptrdiff_t k=0; k<regkext; k+=2*(ORDER+1)) {
for (ptrdiff_t i=0; i<regiext; i+=2*(ORDER+1)) {
GLLElement<ORDER>::prolongate_2D
@@ -218,7 +218,7 @@ namespace CarpetLib {
// Loop over fine region
#ifdef HRSCC_HH
ptrdiff_t const k=0;
-#pragma omp parallel for collapse(2)
+#pragma omp parallel for //collapse(2)
for (ptrdiff_t j=0; j<regjext; j+=2*(ORDER+1)) {
for (ptrdiff_t i=0; i<regiext; i+=2*(ORDER+1)) {
GLLElement<ORDER>::prolongate_2D
@@ -254,7 +254,7 @@ namespace CarpetLib {
// Loop over fine region
#ifdef HRSCC_HH
-#pragma omp parallel for collapse(3)
+#pragma omp parallel for //collapse(3)
for (ptrdiff_t k=0; k<regkext; k+=2*(ORDER+1)) {
for (ptrdiff_t j=0; j<regjext; j+=2*(ORDER+1)) {
for (ptrdiff_t i=0; i<regiext; i+=2*(ORDER+1)) {