Skip to content
Snippets Groups Projects

Periodic BC in distributed grid

Merged Jakub Klinkovský requested to merge periodic-bc into develop
All threads resolved!
1 file
+ 6
6
Compare changes
  • Side-by-side
  • Inline
@@ -282,7 +282,7 @@ class MpiCommunicator
@@ -282,7 +282,7 @@ class MpiCommunicator
TNL_ASSERT_TRUE(IsInitialized(), "Fatal Error - MPI communicator is not initialized");
TNL_ASSERT_TRUE(IsInitialized(), "Fatal Error - MPI communicator is not initialized");
TNL_ASSERT_NE(group, NullGroup, "ISend cannot be called with NullGroup");
TNL_ASSERT_NE(group, NullGroup, "ISend cannot be called with NullGroup");
Request req;
Request req;
MPI_Isend((const void*) data, count, MPIDataType(data) , dest, 0, group, &req);
MPI_Isend( const_cast< void* >( ( const void* ) data ), count, MPIDataType(data) , dest, 0, group, &req);
return req;
return req;
#else
#else
throw Exceptions::MPISupportMissing();
throw Exceptions::MPISupportMissing();
@@ -334,7 +334,7 @@ class MpiCommunicator
@@ -334,7 +334,7 @@ class MpiCommunicator
{
{
#ifdef HAVE_MPI
#ifdef HAVE_MPI
TNL_ASSERT_NE(group, NullGroup, "Allreduce cannot be called with NullGroup");
TNL_ASSERT_NE(group, NullGroup, "Allreduce cannot be called with NullGroup");
MPI_Allreduce( (const void*) data, (void*) reduced_data,count,MPIDataType(data),op,group);
MPI_Allreduce( const_cast< void* >( ( void* ) data ), (void*) reduced_data,count,MPIDataType(data),op,group);
#else
#else
throw Exceptions::MPISupportMissing();
throw Exceptions::MPISupportMissing();
#endif
#endif
@@ -366,7 +366,7 @@ class MpiCommunicator
@@ -366,7 +366,7 @@ class MpiCommunicator
{
{
#ifdef HAVE_MPI
#ifdef HAVE_MPI
TNL_ASSERT_NE(group, NullGroup, "Reduce cannot be called with NullGroup");
TNL_ASSERT_NE(group, NullGroup, "Reduce cannot be called with NullGroup");
MPI_Reduce( (const void*) data, (void*) reduced_data,count,MPIDataType(data),op,root,group);
MPI_Reduce( const_cast< void* >( ( void*) data ), (void*) reduced_data,count,MPIDataType(data),op,root,group);
#else
#else
throw Exceptions::MPISupportMissing();
throw Exceptions::MPISupportMissing();
#endif
#endif
@@ -386,7 +386,7 @@ class MpiCommunicator
@@ -386,7 +386,7 @@ class MpiCommunicator
#ifdef HAVE_MPI
#ifdef HAVE_MPI
TNL_ASSERT_NE(group, NullGroup, "SendReceive cannot be called with NullGroup");
TNL_ASSERT_NE(group, NullGroup, "SendReceive cannot be called with NullGroup");
MPI_Status status;
MPI_Status status;
MPI_Sendrecv( ( const void* ) sendData,
MPI_Sendrecv( const_cast< void* >( ( void* ) sendData ),
sendCount,
sendCount,
MPIDataType( sendData ),
MPIDataType( sendData ),
destination,
destination,
@@ -412,7 +412,7 @@ class MpiCommunicator
@@ -412,7 +412,7 @@ class MpiCommunicator
{
{
#ifdef HAVE_MPI
#ifdef HAVE_MPI
TNL_ASSERT_NE(group, NullGroup, "SendReceive cannot be called with NullGroup");
TNL_ASSERT_NE(group, NullGroup, "SendReceive cannot be called with NullGroup");
MPI_Alltoall( ( const void* ) sendData,
MPI_Alltoall( const_cast< void* >( ( void* ) sendData ),
sendCount,
sendCount,
MPIDataType( sendData ),
MPIDataType( sendData ),
( void* ) receiveData,
( void* ) receiveData,
@@ -433,7 +433,7 @@ class MpiCommunicator
@@ -433,7 +433,7 @@ class MpiCommunicator
}
}
}
}
static void CreateNewGroup(bool meToo,int myRank, CommunicationGroup &oldGroup, CommunicationGroup &newGroup)
static void CreateNewGroup( bool meToo, int myRank, CommunicationGroup &oldGroup, CommunicationGroup &newGroup )
{
{
#ifdef HAVE_MPI
#ifdef HAVE_MPI
if(meToo)
if(meToo)
Loading