MPI последовательная основная функция

Это довольно простой вопрос MPI, но я не могу обойти его. У меня есть основная функция, которая вызывает другую функцию, которая использует MPI. Я хочу, чтобы основная функция выполнялась последовательно, а другая - параллельно. Мой код такой:

int main (int argc, char *argv[])
{
    //some serial code goes here
    parallel_function(arg1, arg2);
    //some more serial code goes here
}

void parallel_function(int arg1, int arg2)
{
    //init MPI and do some stuff in parallel
    MPI_Init(NULL, NULL);
    MPI_Comm_size(MPI_COMM_WORLD, &p);
    MPI_Comm_rank(MPI_COMM_WORLD, &my_rank);
    //now do some parallel stuff
    //....
    //finalize to end MPI??
    MPI_Finalize();
}

Мой код работает нормально и получает ожидаемый результат, но проблема в том, что основная функция также выполняется в отдельных процессах, поэтому последовательный код выполняется более одного раза. Я не знаю, как он работает несколько раз, потому что я еще даже не вызывал MPI_Init (если я печатаю f в main перед тем, как я вызываю parallel_function, я вижу несколько printf)

Как я могу остановить мою программу, работающую параллельно после того, как я закончу?

Спасибо за любые ответы!

Ответы на вопрос(2)

Ваш ответ на вопрос