J'essaie d'écrire quelque chose qui calcule très rapidement des nombres aléatoires et peut être appliqué sur plusieurs threads. Mon code actuel est:Génération de nombres aléatoires thread-safe pour l'intégration de Monte-Carlo
/* Approximating PI using a Monte-Carlo method. */
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <time.h>
#include <omp.h>
#define N 1000000000 /* As lareg as possible for increased accuracy */
double random_function(void);
int main(void)
{
int i = 0;
double X, Y;
double count_inside_temp = 0.0, count_inside = 0.0;
unsigned int th_id = omp_get_thread_num();
#pragma omp parallel private(i, X, Y) firstprivate(count_inside_temp)
{
srand(th_id);
#pragma omp for schedule(static)
for (i = 0; i <= N; i++) {
X = 2.0 * random_function() - 1.0;
Y = 2.0 * random_function() - 1.0;
if ((X * X) + (Y * Y) < 1.0) {
count_inside_temp += 1.0;
}
}
#pragma omp atomic
count_inside += count_inside_temp;
}
printf("Approximation to PI is = %.10lf\n", (count_inside * 4.0)/ N);
return 0;
}
double random_function(void)
{
return ((double) rand()/(double) RAND_MAX);
}
Cela fonctionne, mais d'observer un gestionnaire de ressources Je sais que ne pas utiliser tous les fils. Est-ce que rand() fonctionne pour du code multithread? Et sinon, y a-t-il une bonne alternative? Merci beaucoup. Jack
Le lien vers l'implémentation de Ladd est mort, d'autres suggestions pour une implémentation fortran? – lalmei