ForkMaster/netgen
1
0
Fork 0
mirror of https://github.com/NGSolve/netgen.git synced 2025-04-10 15:27:26 +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

1
ng/ngappinit.cpp
View File

@ -71,6 +71,7 @@ int main(int argc, char ** argv)
// MPI_Init(&argc, &argv);
int required = MPI_THREAD_MULTIPLE;
// int required = 0;
int provided;
MPI_Init_thread(&argc, &argv, required, &provided);

4
ng/parallelfunc.cpp
View File

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