Definition
MPI_LONG_LONG is an MPI_Datatype that represents a long long integer type in MPI, it corresponds to a long long int in C. It is a synonym of MPI_LONG_LONG_INT.
Datatypes
C
MPI_LONG_LONG is an MPI_Datatype that represents a long long integer type in MPI, it corresponds to a long long int in C. It is a synonym of MPI_LONG_LONG_INT.
#include <stdio.h>
#include <stdlib.h>
#include <mpi.h>
/**
* @brief Illustrate how to communicate a long long int between 2 MPI processes.
* @details This application is meant to be run with 2 MPI processes: 1 sender
* and 1 receiver. The former sends a long long int to the latter, which prints
* it.
**/
int main(int argc, char* argv[])
{
MPI_Init(&argc, &argv);
// Check that 2 MPI processes are used.
int size;
MPI_Comm_size(MPI_COMM_WORLD, &size);
if(size != 2)
{
printf("This application is meant to be run with 2 MPI processes.\n");
MPI_Abort(MPI_COMM_WORLD, EXIT_FAILURE);
}
// Get my rank and do the corresponding job.
enum role_ranks { SENDER, RECEIVER };
int my_rank;
MPI_Comm_rank(MPI_COMM_WORLD, &my_rank);
switch(my_rank)
{
case SENDER:
{
// Send the long long int
long long int longLongIntToSend = 12345;
printf("[MPI process %d] I send long long int: %lld.\n", my_rank, longLongIntToSend);
MPI_Ssend(&longLongIntToSend, 1, MPI_LONG_LONG, RECEIVER, 0, MPI_COMM_WORLD);
break;
}
case RECEIVER:
{
// Receive the long long int
long long int longLongIntReceived;
MPI_Recv(&longLongIntReceived, 1, MPI_LONG_LONG, SENDER, 0, MPI_COMM_WORLD, MPI_STATUS_IGNORE);
printf("[MPI process %d] I received long long int: %lld.\n", my_rank, longLongIntReceived);
break;
}
}
MPI_Finalize();
return EXIT_SUCCESS;
}
#include <stdio.h>
#include <stdlib.h>
#include <mpi.h>
/**
* @brief Illustrate how to communicate an array of long long ints between 2 MPI
* processes.
* @details This application is meant to be run with 2 MPI processes: 1 sender
* and 1 receiver. The former sends an array of long long ints to the latter,
* which prints it.
**/
int main(int argc, char* argv[])
{
MPI_Init(&argc, &argv);
// Check that 2 MPI processes are used.
int size;
MPI_Comm_size(MPI_COMM_WORLD, &size);
if(size != 2)
{
printf("This application is meant to be run with 2 MPI processes.\n");
MPI_Abort(MPI_COMM_WORLD, EXIT_FAILURE);
}
// Get my rank and do the corresponding job.
enum role_ranks { SENDER, RECEIVER };
int my_rank;
MPI_Comm_rank(MPI_COMM_WORLD, &my_rank);
switch(my_rank)
{
case SENDER:
{
// Send the long long ints
long long int longLongIntsToSend[2] = { 12345, 67890 };
printf("[MPI process %d] I send long long ints: %lld and %lld.\n", my_rank, longLongIntsToSend[0], longLongIntsToSend[1]);
MPI_Ssend(longLongIntsToSend, 2, MPI_LONG_LONG, RECEIVER, 0, MPI_COMM_WORLD);
break;
}
case RECEIVER:
{
// Receive the long long ints
long long int longLongIntsReceived[2];
MPI_Recv(longLongIntsReceived, 2, MPI_LONG_LONG, SENDER, 0, MPI_COMM_WORLD, MPI_STATUS_IGNORE);
printf("[MPI process %d] I received long long ints: %lld and %lld.\n", my_rank, longLongIntsReceived[0], longLongIntsReceived[1]);
break;
}
}
MPI_Finalize();
return EXIT_SUCCESS;
}