特卡洛法又称随机抽样技术

是一种应用随机数进行仿真试验的方法。

用该方法计算π的基本思路是：

根据圆面积的公式： s=πR2 ,当R=1时，S=π。

由于圆的方程是：x2+y2=1(X2为X的平方的意思),因此1/4圆面积为X轴、y轴和上述方程所包围的部分。

如果在1*1的矩形中均匀地落入随机点，则落入1/4园中的点的概率就是1/4圆的面积。其4倍，就是圆面积。

由于半径为1，该面积的值为π的值。

#include
#include
#include
#include

#define MaxThreadNum 32
#define kSamplePoints 1000
#define kSpace 1

void *compute_pi(void *);
inline double WallTime();

int total_hits, hits[MaxThreadNum][kSpace];
int sample_points_per_thread, num_threads;

int main(void)
{
int i;
double time_start, time_end;

pthread_t p_threads[MaxThreadNum];
pthread_attr_t attr;

pthread_attr_init(&attr);
pthread_attr_setscope(&attr, PTHREAD_SCOPE_SYSTEM);
printf("Enter num_threads\n");
scanf("%d", &num_threads);

time_start = WallTime();

total_hits = 0;
sample_points_per_thread = kSamplePoints / num_threads;

for(i=0; i {
hits[i][0] = i;
pthread_create(&p_threads[i], &attr, compute_pi, (void *)&hits[i]);
}

for(i=0; i {
pthread_join(p_threads[i], NULL);
total_hits += hits[i][0];
}

double pi = 4.0 * (double)total_hits / kSamplePoints;
time_end = WallTime();
printf("Elasped time: %lf, Pi: %lf\n", time_end - time_start, pi);

return 0;

}

void *compute_pi(void * s)
{
unsigned int seed;
int i;
int *hit_pointer;
double rand_no_x, rand_no_y;
hit_pointer = (int *)s;
seed = *hit_pointer;
local_hits = 0;

for(i=0; i {
rand_no_x = (double)(rand_r(&seed))/(double)(RAND_MAX);
rand_no_y = (double)(rand_r(&seed))/(double)(RAND_MAX);
if((rand_no_x - 0.5)*(rand_no_x - 0.5) + (rand_no_y - 0.5) * (rand_no_y - 0.5) < 0.25)
{
(*hit_pointer)++;
}
seed *= i;
}
pthread_exit(0);
}

inline double WallTime()
{
struct timeva l tv;
struct timezone tz;

gettimeofday(&tv, &tz);

double currTime = (double)tv.tv_sec + (double)tv.tv_usec/1000000.0;

return currTime;
}