openmp
Simple ejemplo paralelo
Buscar..
Sintaxis
#pragma omp parallel
indica que todos los subprocesos ejecutarán el siguiente bloque.int omp_get_num_threads (void)
: devuelve el número de subprocesos que trabajan en la región paralela (también conocido como equipo de subprocesos).int omp_get_thread_num (void)
: devuelve el identificador del subproceso que llama (rangos de 0 a N-1 donde N se limita aomp_get_num_threads()
).
Observaciones
Puede usar la variable de entorno OMP_NUM_THREADS
o la directiva num_threads
dentro del #pragma parallel
para indicar el número de subprocesos en ejecución para toda la aplicación o para la región especificada, respectivamente.
Mundo paralelo de hola usando OpenMP
El siguiente código C utiliza el modelo de programación paralela OpenMP para escribir el ID de hilo y la cantidad de hilos en stdout
usando múltiples hilos.
#include <omp.h>
#include <stdio.h>
int main ()
{
#pragma omp parallel
{
// ID of the thread in the current team
int thread_id = omp_get_thread_num();
// Number of threads in the current team
int nthreads = omp_get_num_threads();
printf("I'm thread %d out of %d threads.\n", thread_id, nthreads);
}
return 0;
}
En Fortran 90+ el programa equivalente se ve así:
program Hello
use omp_lib, only: omp_get_thread_num, omp_get_num_threads
implicit none
integer :: thread_id
integer :: nthreads
!$omp parallel private( thread_id, nthreads )
! ID of the thread in the current team
thread_id = omp_get_thread_num()
! Number of threads in the current team
nthreads = omp_get_num_threads()
print *, "I'm thread", thread_id, "out of", nthreads, "threads."
!$omp end parallel
end program Hello