Searched refs:mpi_procedure (Results 1 – 2 of 2) sorted by relevance
/dports/science/gnudatalanguage/gdl-1.0.1/src/ |
H A D | gdl.cpp | 519 char* mpi_procedure = getenv("GDL_MPI"); in main() local 520 if (myrank == 0 && mpi_procedure != NULL){ in main() 522 MPI_Send(mpi_procedure, strlen(mpi_procedure)+1, MPI_CHAR, i, in main()
|
H A D | dinterpreter.cpp | 1679 char mpi_procedure[256]; in InterpreterLoop() local 1685 MPI_Recv(mpi_procedure, 256, MPI_CHAR, 0, tag, MPI_COMM_WORLD, &status); in InterpreterLoop() 1687 istringstream istr(StrUpCase(mpi_procedure) + "\n"); in InterpreterLoop()
|