Skip to main content
summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
Diffstat (limited to 'tools/pldt/org.eclipse.ptp.pldt.wizards/templates/MPIpiCPPproject/src/Basename.cpp')
-rw-r--r--tools/pldt/org.eclipse.ptp.pldt.wizards/templates/MPIpiCPPproject/src/Basename.cpp57
1 files changed, 0 insertions, 57 deletions
diff --git a/tools/pldt/org.eclipse.ptp.pldt.wizards/templates/MPIpiCPPproject/src/Basename.cpp b/tools/pldt/org.eclipse.ptp.pldt.wizards/templates/MPIpiCPPproject/src/Basename.cpp
deleted file mode 100644
index 983a0cbdd..000000000
--- a/tools/pldt/org.eclipse.ptp.pldt.wizards/templates/MPIpiCPPproject/src/Basename.cpp
+++ /dev/null
@@ -1,57 +0,0 @@
-/*
- ============================================================================
- Name : $(baseName).c
- Author : $(author)
- Version :
- Copyright : $(copyright)
- Description : Compute Pi in MPI C++
- ============================================================================
- */
-#include <math.h>
-#include "mpi.h"
-#include <iostream>
-using namespace std;
-
-int main(int argc, char *argv[])
-{
- int n, rank, size, i;
- double PI25DT = 3.141592653589793238462643;
- double mypi, pi, h, sum, x;
-
- MPI::Init(argc, argv);
- size = MPI::COMM_WORLD.Get_size();
- rank = MPI::COMM_WORLD.Get_rank();
-
- while (1) {
- if (rank == 0) {
-
- cout << "Enter the number of intervals: (0 quits)"
- << endl;
- cin >> n;
-
- }
-
- MPI::COMM_WORLD.Bcast(&n, 1, MPI::INT, 0);
- if (n==0)
- break;
- else {
- h = 1.0 / (double) n;
- sum = 0.0;
- for (i = rank + 1; i <= n; i += size) {
- x = h * ((double)i - 0.5);
- sum += (4.0 / (1.0 + x*x));
- }
- mypi = h * sum;
-
- MPI::COMM_WORLD.Reduce(&mypi, &pi, 1, MPI::DOUBLE,
- MPI::SUM, 0);
- if (rank == 0)
- cout << "pi is approximately " << pi
- << ", Error is " << fabs(pi - PI25DT)
- << endl;
- }
- }
- MPI::Finalize();
- return 0;
-}
-

Back to the top