Recv_timestep()

template<typename T >

void cntr::herm_matrix< 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 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 3547 of file cntr_herm_matrix_impl.hpp.

                                                              {
    int taskid;
    MPI_Comm_rank(MPI_COMM_WORLD, &taskid);
    if (!(taskid == root)) {
        herm_matrix_timestep<T> Gtemp;
        Gtemp.resize(tstp, ntau_, size1_);
        if (sizeof(T) == sizeof(double))
            MPI_Recv(Gtemp.data_, Gtemp.total_size_,
                                 MPI_DOUBLE_COMPLEX, root, tag, MPI_COMM_WORLD, MPI_STATUS_IGNORE);
        else
            MPI_Recv(Gtemp.data_, Gtemp.total_size_, MPI_COMPLEX,
                                 root, tag, MPI_COMM_WORLD, MPI_STATUS_IGNORE);
        this->set_timestep(tstp, Gtemp);
    }
}