ForkMaster/netgen
1
0
Fork 0
mirror of https://github.com/NGSolve/netgen.git synced 2025-01-27 21:30:35 +05:00
Code Issues Packages Projects Releases Wiki Activity

parallel computing

Browse Source
This commit is contained in:
Joachim Schoeberl 2012-02-12 02:25:26 +00:00
parent d705856ed0
commit 6770f8f1aa
2 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ng/ngappinit.cpp
View File

@ -66,11 +66,12 @@ bool shellmode = false;
int main(int argc, char ** argv) int main(int argc, char ** argv)
{ {
#ifdef PARALLEL #ifdef PARALLEL
// MPI_Init(&argc, &argv); // MPI_Init(&argc, &argv);
int required = MPI_THREAD_MULTIPLE; int required = MPI_THREAD_MULTIPLE;
// int required = 0;
int provided; int provided;
MPI_Init_thread(&argc, &argv, required, &provided); MPI_Init_thread(&argc, &argv, required, &provided);
@ -140,7 +141,7 @@ int main(int argc, char ** argv)
if (verbose) if (verbose)
cout << "NETGENDIR = " << ngdir << endl; cout << "NETGENDIR = " << ngdir << endl;
if ( netgen::id == 0 ) if ( netgen::id == 0 )
{ {

4
ng/parallelfunc.cpp
View File

@ -98,8 +98,6 @@ void ParallelRun()
MPI_Comm_size(MPI_COMM_WORLD, &ntasks); MPI_Comm_size(MPI_COMM_WORLD, &ntasks);
MPI_Comm_rank(MPI_COMM_WORLD, &id); MPI_Comm_rank(MPI_COMM_WORLD, &id);
bool test = true; bool test = true;
// testout = new ostream(0); // testout = new ostream(0);
@ -195,9 +193,9 @@ void ParallelRun()
MyMPI_Recv (curDrawable, 0, MPI_TAG_VIS); MyMPI_Recv (curDrawable, 0, MPI_TAG_VIS);
MyMPI_Recv (contextid, 0, MPI_TAG_VIS); MyMPI_Recv (contextid, 0, MPI_TAG_VIS);
display = XOpenDisplay (displname.c_str()); display = XOpenDisplay (displname.c_str());
/* /*
PrintMessage (3, "displ - name = ", displname); PrintMessage (3, "displ - name = ", displname);
PrintMessage (3, "display = ", display, PrintMessage (3, "display = ", display,