OpenMP set_num_threads () no funciona

Estoy escribiendo un programa paralelo usando OpenMP en C ++.

Quiero controlar el número de hilos en el programa usandoomp_set_num_threads(), Pero no funciona.

#include <iostream>
#include <omp.h>
#include "mpi.h"

using namespace std;

int myrank;
int groupsize;
double sum;
double t1,t2;
int n = 10000000;

int main(int argc, char *argv[])
{
    MPI_Init( &argc, &argv);
    MPI_Comm_rank( MPI_COMM_WORLD, &myrank );
    MPI_Comm_size(MPI_COMM_WORLD,&groupsize);

    omp_set_num_threads(4);

    sum = 0;
    #pragma omp for  reduction(+:sum)
    for (int i = 0; i < n; i++)
        sum+= i/(n/10);

    cout<<"sum="<<sum<<endl;
    cout<<"threads="<<omp_get_num_threads()<<endl;

    MPI_Finalize();
    return 0;
}

Las salidas del programa:

sum = 4.5e+007
threads=1

¿Cómo controlar el número de hilos?

Respuestas a la pregunta(5)

Su respuesta a la pregunta