Ошибка mpiexec 10061 Ошибка подключения к носку

Question

У меня проблема:

mpiexec.exe -noprompt -wdir "D: \ ###" -n 1 "D: \ ### \ _ simple_test.exe"

печать

Ошибка при подключении к хосту, ###. (10061)

Ошибка подключения к носку (host=###-pc, port=8678), исчерпаны все конечные точки

Невозможно подключиться к "###-pc:8678",

Ошибка носка: Ошибка = -1

Код программы:

#include <stddef.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <mpi.h>

int main(int argc, char **argv)
{
    char message[20];
    int i, rank, size, type = 99;
    MPI_Status status;
    MPI_Init(&argc, &argv);
    MPI_Comm_size(MPI_COMM_WORLD, &size);
    MPI_Comm_rank(MPI_COMM_WORLD, &rank);
    if (rank == 0)
    {
        strcpy(message, "Hello, world!");
        for (i = 1; i < size; i++)
            MPI_Send(message, 14, MPI_CHAR, i, type,
                MPI_COMM_WORLD);
    }
    else
        MPI_Recv(message, 20, MPI_CHAR, 0, type,
            MPI_COMM_WORLD, &status);
    printf("Message from process = %d : %.14s\n", rank, message);
    MPI_Finalize();
    system("pause");
    return 0;
}

Как я могу это исправить?