Recv_timestep()

template<typename T >

void cntr::herm_matrix_timestep< T >::Recv_timestep	(	int	tstp,
		int	root,
		int	tag
	)

Recevies the herm_matrix at a given time step from a specific task.

Purpose

Receives the herm_matrix_timestep at a given time step tstp from a specific task with rank root.

Parameters

tstp	Time step which should be received.
root	The task rank from which the herm_matrix should be received.
tag	The MPI error flag.

Definition at line 2716 of file cntr_herm_matrix_timestep_impl.hpp.

                                                                       {
   int taskid;
   MPI_Comm_rank(MPI_COMM_WORLD, &taskid);
   if (!(taskid == root)) {
      resize(tstp, ntau_, size1_);
      int len = (2 * (tstp_ + 1) + ntau_ + 1) * element_size_;
      if (sizeof(T) == sizeof(double))
         MPI_Recv(data_, len, MPI_DOUBLE_COMPLEX, root, tag, MPI_COMM_WORLD, MPI_STATUS_IGNORE);
      else
         MPI_Recv(data_, len, MPI_COMPLEX, root, tag, MPI_COMM_WORLD, MPI_STATUS_IGNORE);
   }
}