Ajout de l'ensemble du workspace.

[GPU.git] / WCudaMSE / Student_OMP / src / cpp / core / omp / 02_pi / 04_pi_entrelacer_atomic.cpp

diff --git a/WCudaMSE/Student_OMP/src/cpp/core/omp/02_pi/04_pi_entrelacer_atomic.cpp b/WCudaMSE/Student_OMP/src/cpp/core/omp/02_pi/04_pi_entrelacer_atomic.cpp
new file mode 100755 (executable)
index 0000000..00df8bd
--- /dev/null
+++ b/WCudaMSE/Student_OMP/src/cpp/core/omp/02_pi/04_pi_entrelacer_atomic.cpp
@@ -0,0 +1,77 @@
+#include <omp.h>\r
+#include "00_pi_tools.h"\r
+#include "OmpTools.h"\r
+\r
+/*----------------------------------------------------------------------*\\r
+ |*                    Declaration                                     *|\r
+ \*---------------------------------------------------------------------*/\r
+\r
+/*--------------------------------------*\\r
+ |*            Imported                *|\r
+ \*-------------------------------------*/\r
+\r
+\r
+/*--------------------------------------*\\r
+ |*            Public                  *|\r
+ \*-------------------------------------*/\r
+\r
+bool isPiOMPEntrelacerAtomic_Ok(int n);\r
+\r
+/*--------------------------------------*\\r
+ |*            Private                 *|\r
+ \*-------------------------------------*/\r
+\r
+static double piOMPEntrelacerAtomic(int n);\r
+\r
+/*----------------------------------------------------------------------*\\r
+ |*                    Implementation                                  *|\r
+ \*---------------------------------------------------------------------*/\r
+\r
+/*--------------------------------------*\\r
+ |*            Public                  *|\r
+ \*-------------------------------------*/\r
+\r
+bool isPiOMPEntrelacerAtomic_Ok(int n)\r
+    {\r
+    return isAlgoPI_OK(piOMPEntrelacerAtomic,  n, "Pi OMP Entrelacer atomic");\r
+    }\r
+\r
+/*--------------------------------------*\\r
+ |*            Private                 *|\r
+ \*-------------------------------------*/\r
+\r
+/**\r
+ * Bonne performance, si!\r
+ */\r
+double piOMPEntrelacerAtomic(int n)\r
+    {\r
+    const int NB_THREAD = OmpTools::setAndGetNaturalGranularity();\r
+    const double DX = 1.0/(double)n;\r
+    double sum = 0;\r
+\r
+    #pragma omp parallel\r
+       {\r
+       double xs;\r
+       double sumLocalThread = 0;\r
+       const int TID = OmpTools::getTid();\r
+       int s = TID;\r
+\r
+       while (s < n)\r
+           {\r
+           xs = s * DX;\r
+           sumLocalThread += fpi(xs);\r
+           s += NB_THREAD;\r
+           }\r
+\r
+       #pragma omp atomic\r
+           sum += sumLocalThread;\r
+\r
+       }\r
+\r
+    return sum * DX;\r
+    }\r
+\r
+/*----------------------------------------------------------------------*\\r
+ |*                    End                                             *|\r
+ \*---------------------------------------------------------------------*/\r
+\r