parallel bug fix

This commit is contained in:
Joachim Schoeberl 2011-06-30 13:53:35 +00:00
parent a64aa8226e
commit a19fe515b0

View File

@ -951,7 +951,7 @@ namespace netgen
{
FlatArray<PointIndex> verts = verts_of_proc[dest];
MyMPI_ISend ( "vertex", dest );
MyMPI_Send ("vertex", dest);
MyMPI_ISend (verts, dest);
@ -1043,7 +1043,7 @@ namespace netgen
for ( int dest = 1; dest < ntasks; dest ++ )
{
MyMPI_ISend ( "volumeelements", dest);
MyMPI_Send ( "volumeelements", dest);
MyMPI_ISend ( elementarrays[dest], dest, sendrequest[dest] );
}